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Systeiri/360 Basic Programining Support Basic 
Assembler. It is intended for technical 
personnel who are responsible for analyzing 
program operation^ diagnosing malfunctions, 
and/or adapting the program to special 
usage. 




PREFACE 



This manual is designed to give the 
reader a thorough understanding of the 
functioning of the Basic Programming Sup- 
port Basic Assembler Program. 

Effective use of this publication is 
based on an understanding of the IBM 
System/360 machine operations and the 
System/SGO Basic Programming Support Basic 
Assembler Language, This information can 
be found in the following IBM System/ 3 60 
publications: 

IBM System/360 Principles of Qperation y 
Form A22-6821 

IBM Systemi/360 Basic Proqramm.inq Support 
Basic Assembler Language ^ Form C28-6503 

The first section of this manual pre- 
sents the overall purpose and description 
of the Basic Programming Support Basic 
Assembler programu A breakdown of the 
Basic Programming Support Basic Assembler 
into its major components is also provided 
in this first section. The remainder of 
the manual is devoted to more detailed 
descriptions and flowcharts of the major 
com.ponentSy down to the function block 
level. If more detail is needed than that 
provided by the function block description, 
the reader is referred to the Basic Pro- 
gramming Support Basic Assembler Program 
listing. 
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GENERAL INTRODUCTION 



PURPOSE OF PROGRAM 



The Basic Prograinining Support Basic. 
Assembler Program is designed to translate 
a source program written in symbolic lan- 
guage into an object program in machine 
language. Each phase of the program must 
be assembled on an IBM System/360 with main 
storage of greater than 8^192 bytes. 



PROGRAM ORGANIZATION 



The assembler is a two-phase program, 
i.e., two- storage- load program. Phase I is 
the first storage load, and Phase II is the 
second storage load. Only the phase cur- 
rently being executed occupies an area in 
main storage. The program is designed in 
this manner so that the maximum amount of 
main storage is available as working area 
for each phase (main storage not occupied 
by the assembler, tables, etc.) . 

The Basic Programming Support Basic 
Assembler Program has the same functions as 
any assembly program. It accomplishes the 
following: 

1. Replaces each symbolic operation code 
with its machine-language equivalent, 

2. Replaces each symbolic operand with an 
actual address, 

3. Reserves an area of main storage for 
each instruction and data area. 

Phase I accomplishes the following major 
functions : 

1 . Replaces the symbolic operation code 
of each source statement with its 
machine language equivalent through 
the use of the Operation Code Table. 

(See "Phase I," Section 2, "Tables.") 
This information is placed in a buf- 
fer, the Intermediate Text Buffer, to 
be translated by Phase II. (See 
"Phase I," Section 2, "Tables.") 

2. Builds a table of all symbolic oper- 
ands in the source statements. This 
table is called the Symbol Table. 

(See "Phase I," Section 2, "Tables.") 
The location of the symbolic operand 
within the Symbol Table, along with 
all self -defining operands, is also 
placed in the Intermediate Text. 

3. Allocates storage to source statements 
and to data areas with an internal 
counter called the location counter. 



Phase II of the Assembler Program accom- 
plishes the following major functions: 

1. Translates the Intermediate Text into 
machine language. During this tran- 
slation the symbolic operands are 
replaced with the actual addresses of 
symbols from the Symbol Table. 

2. Produces the object program. 

3. Produces a program listing. 

The tables, cards, records, and the 
translation required to accomplish the 
functions listed above are described in 
detail in the discussion of each phase. 



OVERALL OPERATION OF PROGRAM 



A generalized logic flow of the two- 
phase assembly program is shown on Charts 
01 and 02. A detailed description of each 
phase is given in the "Phase I" and "Phase 
II" sections of this publication. In the 
following text, the flowchart block numbers 
being described are indicated in 
parentheses. 



Phase I (Chart 01) 



At the start of the assembly, the Phase 
I assembly deck or tape is loaded into 
lower main storage (02) . 

If the source program is on cards and is 
being reassembled, the symbol table that 
was constructed and punched into cards from 
a previous assembly is read into main 
storage (03) . 

The symbolic language source program, on 
cards or in the form of card images on 
tape, follows Phase I of the assembly 
program and the symbol table (if present) . 
Each source statement from card or tape is 
read and processed, and the necessary 
information is punched into the same card, 
or written onto tape, or punched into a new 
card before the next source statement is 
read. If this is a reassembly, the new 
information is compared to the old informa- 
tion before any action occurs. The type of 
input depends upon the system configu- 
ration. 
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The first test performed on a source 
statement is to check for a symbol in the 
name field (05) . If the statement has a 
symbol in the name fields it is noted (06) . 
The symbol is not placed in the Symbol 
Table at this time because the correct 
processing of the symbol will be determined 
by the operation code of the statement. 
Symbols in the name field of some Assembler 
instructions will not be used by the assem- 
bler andr therefore, will not be placed in 
the Symbol Table. 



If the name field does not contain a 
symbol, but the statement begins with an 
asterisk (07) , indicating a comments state- 
ment, the only action taken is to indicate 
this in the Intermediate Text (08) . 



If the statement is blank (09) , it is 
ignored, and the next source statement is 
read in (OU) . If it is not blank, the 
Operation Code Table that was loaded into 
main storage as part of the assembler decK 
is searched for the corresponding machine 
language operation code (TO) . The m^a chine 
language operation code is then stored in 
the Intermediate Text. If the operation 
code is not found, or if other errors in 
any part of the source program statement 
are found by the assembler, the necessary 
error flag (s) is placed in the Intermediate 
Text. 



The operand field of the source state- 
ment is scanned next (11). Formats are 
checked, and the expressions in the operand 
field are translated according to format 
and placed in the Intermediate Text. (See 
"Phase I," Section 5, "Operand Field Tran- 
slation. ") 



All the information concerning the 
source statement that can be determined by 
Phase I is stored in the Intermediate Text, 
and the Intermediate Text is then punched 
into a card or written on tape, depending 
upon the system configuration (13) . 



Phase II (Chart 02) 



Phase II of the Assembler Program is 
read into main storage. If the Symbol 
Table deck is in the card reader, it is 
read into the area of main storage reserved 
for the Symbol Table (03) . 

The first statement containing the 
Intermediate Text is then read and checked. 
The output buffer area is checked to deter- 
mine if enough information has been trans- 
lated to produce an object program, card 
(07) . If enough information has been 
translated, an object program card is pro- 
duced (08) before the next statement is 
read (05) . 

The Intermediate Text is translated 
according to the type and format of the 
input source statement. 

An Assembler instruction (09) is trans- 
lated according to type (14) . Each 
instruction has different requirements and 
requires a different routine to translate 
it. (See "Phase II," Section 5, 
"Intermediate Text Translation.") 

A machine instruction (10) must be 
translated according to format (15) since 
there are five different f orm.ats (RR, RX, 
RS, SI, SS) for machine instructions. (See 
"Phase II," Section 5, "Intermediate Text 
Translation.") 

If an error was encountered during Phase 
I requiring that the instruction be assem- 
bled as zeros (11) , zeros are stored in the 
output buffer (16) • 

A statement that contains comments, or 
an error that will not allow the instruc- 
tion to be translated, will cause only the 
source statement to be printed in the 
object program listing (12) . 

The Intermediate Text is read and trans- 
lated until the END statement is encoun- 
tered (12.5) . When the END statement is 
encountered, the following conditions 
occur: 



The next source statement is then read 
and processed. Source statements are read 
and processed until the END statement is 
encountered (14). When the END statement 
is encountered, the Symbol Table is punched 
into blank cards for a card system (15) , 
the value (attribute) section of the Symbol 
Table is relocated to upper main storage, 
and the message 1EA is printed. The assem- 
bly program is then ready to read Phase II 
into main storage. However, if the assem- 
bler was loaded from tape, the message lEA 
is not printed, and Phase II is loaded 
immediately. 



1, 



The remaining information in the out- 
put area is produced in object program 
form. 

RLD cards, if any, are produced. 
If object code is being written on 
tape, a LDT record is written immedi- 
ately after the END record and the 
tape is backspaced. If it is stacked 
output, only the final LDT record 
remains, the others being overlaid by 
the first record of each succeeding 
job. 

The message 2EA is printed and the 
program stops* 
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Figure 1. Storage Allocation 
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STORAGE ALLOCATION 



Figure 1 illustrates the relative loca- 
tions in main storage of Phase I and Phase 
II of the Assembler Program. Figure 1, 
part A, shows the allocation at load time, 
and Figure 1, part B, shows the allocation 
after the housekeeping and the ICTL, START, 
ENTRY, and EXTRN processing are completed. 



I/O FLOW 



Figure 2 illustrates the I/O flow of the 
Assembler Program. 



The Phase I deck is read from the card 
reader or input tape unit. The Symbol 
Table deck will then precede the source 
deck if this is a reassembly procedure as 
described in the publication, IBM 
System/360 Basic Programming Support Basic 
Assembler Language , Form C28-6503. 



After the Phase I Assembler deck is read 
into main storage, and the Symbol Table 
deck if present, each Statement of the 
source program is read and partially trans- 
lated. The partially translated source 
statement (Intermediate Text) is punched 
into the source statement card (1442) , 
punched into a new card along with the 
source statement ( 2540) , or placed on tape 
(1442 or 2540 with tape) . 

The Phase II deck is then read from the 
card reader or tape unit. The Symbol Table 
deck will then be read into main storage if 
this is a deferred assembly, as described 
in the publication, IBM System/360 Basic 
Programming Support Basic Assembler Lan- 
guage , Form C28-6503. 

The Intermediate Text developed by Phase 
I is then read one card or record at a time 
and translated, the object program is 
punched into cards or placed on tape, and 
the object program listing is produced. 

Figure 3 shows the buffer areas for the 
card-only option and Figure 4 shows the 
buffer areas for the tape option. 
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01 

« » 

» START ». 

*************** 



********** 



*READ IN PHASE 1* 
.X» DO NECESSARY * 

* HOUSEKEEPING * 

* * 
***************** 



******** 



************************ 
PHASE I INITIALIZATION 
(CHART 03) 



»»«**B2 ********** 
» * 

* IF NOT FIRST » 
*ASSEMBLY, READ * 
*IN SYMBOL TABLE* 
» * 

***************** 



************ 



******************** 



********************************* 



»«**«C2********** 

» READ * 

SOURCE 

* STATEMENT * 



SYMBOL 
IN NAME 
FIELD 



D3 *. 

, » » 

COMMENTS 



«««»«E2********** 

* * 
*SAVE SYMBOL AND* 
♦SET INDICATORS « 
*IF NOT CORRECT * 

* * 
***************** 



*****^j* ********* 

* * 
*PLACE ID-CODE C* 
*IN INTERMEDIATE* 

* TEXT * 
« * 
***************** 



*****£4.**** ****** 

* GET OPERATION * 
*CODE AND STORE * 

* IN * 

* INTERMEDIATE * 

* TEXT * 
***************** 



X 11 

* TRANSLATE * 

* OPERAND FIELD » 

* AND STORE IN * 

* INTERMEDIATE * 

* TEXT * 
»«******»«»*»♦»*» 



X 12 
*«»»»G 4 ********** 

* PLACE SYMBOL * 
*FROM NAME FIELD* 

* INTO * 
♦SYMBOL TABLE IF* 

* CORRECT * 



**»»»*H4*********** 

* WRITE * 

INTERMEDIATE 

* TEXT * 

************* 



END CARD 



» PHASE I CONTROL ROUTINE 

* 

* (CHARTS 04 AND 05) 

* 

*************************** 



X 15 

««*««« KA*********** 

PUNCH SYMBOL 

» TBL DECK IF * 

CARD INTER- 

*MEDIATE TEXT * 

SYSTEM 



* ««««K5********* 

* » « 
.*.X« TO PHASE II * 

» « * 

* *************** 



»«*»*««**»«»»»»»*»»««***»*»»*»»»»«»*»»»»»««»*»»* 



Chart 01. Phase I 
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****f^ I ********* 

* * 
« START * 

* * 



*****AZ** ******** 

* * 

* SET INPUT * 
X* PARAMETERS * 

* ACCORDING TO * 

* INPUT * 
***************** 



***B I********** 



******B2** ********* 



***************** 



************* 



**** 

* * 

* C3 * 
» * 



PHASE II CONTROL ROUTINE 
(CHART 07) 



* * 
»READ IN SYMBOL * 
♦TABLE IF SYMBOL* 

* TABLE DECK * 

* * 
***************** 



»**»*C3********** 

♦RESET NECESSARY* 
* SWITCHES AND * 
*STORE LOC. CTR.» 



X 04 
»*«»*D2* ********* 

* SET OUTPUT * 
*AREAS AND OUT- * 
*FUT PARAMETERS * 

* ACCORDING TO * 

* OUTPUT * 



*»««**D3********** 



««««»«««»««*« 



.* OUTPUT *. NO 
.BUFFER READY .*... 
». TO BE .* 
♦EMPTIED* 



.* IS IT AN *. 

ASSEMBLER . 

♦INSTRUCTION* 



«««««E5 ********** 
» * 

* TRANSLATE * 
X* ACCORDING TO * 

* TYPE * 

* * 
***************** 



PHASE II INITIALIZATION 
(CHART 06) 



* PRODUCE CARD 

* IF OUTPUT 

* BUFFER FULL 
* 



» IS IT A *. 

MACHINE 
♦INSTRUCTION* 



»»»««F5 ********** 

* * 

* TRANSLATE * 
.X* ACCORDING TO *. 

* FORMAT * 

* * 
***************** 



* C3 ♦ 

* * 



.♦ IS IT TO ♦ 
.BE ASSEMBLED 
*.AS ZEROS .♦ 



»»»*»G5******* 



************* 



*****H4********** 



* PRINT A LINE *X. 



»***»*««»»*****» 



«*«»*H5 *♦♦♦****♦* 

* * 

* STORE DATA * 
.* IN OUTPUT *X 

« BUFFER * 



J4 *. 12.5 
» *, 

*. YES 



»***J5 ♦♦♦***♦♦♦ 

. X* END PHASE II * 
* * 

*************** 



Chart 02. Phase II 



«««««K4****^***** 

* * 

* INCREMENT * 

* LOCATION * 

* COUNTER * 

* * 
***************** 
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PHASE I 



SECTION 1: INTRODUCTION 



The major functions of Phase I of the 
Assembler Program are as follows: 



Replace the Symbolic Operation Code with 
Its Machine Language Equivalent 



The symbolic operation code of each 
assembler language source statement is 
replaced with its machine language equiva- 
lent through the use of a table called the 
Operation Code Table, This table contains 
each assembler language symbolic operation 
code and its equivalent machine language 
operation code. The Operation Code Table 
is discussed in detail in Section 2, 
"Tables." 



execution of Phase I. This table ^ called 
the Symbol Table, consists of each symbolic 
name and its associated actual address, and 
other pertinent data. The Symbol Table is 
discussed in detail in Section 2, "Tables," 
The Symbol Table is punched into cards at 
the completion of Phase I when the card 
intermediate text system is being used. 
The Symbol Table remains in main storage 
when intermediate text is- on tape. 

If Phase II of the Assembler Program is 
not executed immediately following Phase I, 
the Symbol Table cards must be placed in 
front of the source deck when Phase II is 
to be executed. When a tape system is 
being used. Phase II must immediately fol- 
low Phase I. If Phase II is executed 
immediately following Phase I , the Symbol 
Table remains in main storage, and the 
Symbol Table cards do not have to be 
loaded. 



The Assembler Program reads the symbolic 
operation code in each source program 
statement, looks it up in this table, and 
picks up the corresponding machine opera- 
tion code. The machine operation code and 
other pertinent information concerning the 
source statement are stored in a buffer 
called an Intermediate Text buffer. The 
Intermediate Text is discussed in detail in 
Section 2, "Tables," 



During the execution of Phase II, the 
Symbol Table entry corresponding to the 
symbolic operand is found, and the value of 
that symbol is used to generate the object 
program statement. 



Allocate Storage for Intermediate Text 



Translate Symbolic Operands into 
Intermediate Text 



The symbolic operands of each assembler 
language source statement are partially 
translated by Phase I and placed into the 
Intermediate Text, The symbolic operands 
of statements refer to the symbolic names 
of data fields, or symbolic names of other 
source statements. In order to determine 
the actual address for a symbolic operand, 
the actual address of all symbols must 
first be determined. This is why the final 
translation of the source statement is 
accomplished by Phase II, 

The actual address of all symbols is 
determined by building a table during the 



A counter internal to the program is 
used to allocate storage for the intermedi- 
ate text compiled froih the source state- 
ments. This counter, called the location 
counter, is initialized with the machine 
address at which the program is to begin by 
using the START Assembler instruction. 

When the length of a translated source 
statement has been determined, the counter 
is incremented by this length (after bound- 
ary alignment, if necessary) , and the next 
instruction or data area will begin at the 
new location specified by the location 
counter. 

When a statement is encountered that 
specifies that an area of storage must be 
reserved for data, the location counter is 
incremented by the number of storage bytes 
specified for that area. 
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SECTION 2: TABLES 



INTERMEDIATE TEXT 



The Intermediate Text associated with 
each statement contains a total of 24 bytes 
of information. The specif ic meaning of 
the 24 bytes of information and the bit 
patterns associated with the bytes are 
shown in a figure accompanying the descrip- 
tion of each instruction type in Section 5, 
"Operand Field Translation." A general 
discussion of the bytes in the Intermediate 
Text is given in this section. 



Figure 5 is a summary of the Intermedi- 
ate Text associated with each instruction 
type. 



Assembler instruction ^ or a comments state- 
ment, an ID-Code of A, B, or C, respective- 
ly # is placed into byte 1 of the Intermedi- 
ate Text. If an error is encountered later 
during the translation of the source state- 
ment, these ID-Codes will be replaced with 
the appropriate error ID-Code (i.e., J,K,L, 
or M) . 



Byte 2 - Operation Code 



The machine-language operation code is 
placed in this field after the search of 
the Operation Code Table. This field will 
be blank if the source statement contains 
an illegal operation code. 



The breakdown 
is as follows: 



of the Intermediate Text 



Bytes 3-22 - Operand Field 



Byte 1 - ID-Code 



This field is one byte in length and 
contains an ID-Code which indicates whether 
the source statement is a machine instruc- 
tion or an Assembler instruction, whether 
the instruction contains an error, and 
whether or not the statement requires 
further processing by Phase II. The pos- 
sible ID-Codes and their meanings are as 
follows : 



These bytes contain the text compiled 
from the operand field of the instruction. 
Since these bytes will contain different 
information for each instruction type, they 
are explained in detail in the discussion 
of each instruction in Section 5, "Operand 
Field Translation." Bytes 21 and 22 may 
contain error flags if the error ID-Code is 
L or M. 



Bytes 21-24 - Error Flags 



r T- 

|Code I 



Meaning 



|. 1 ^ 

A I Machine instruction, no errors 

B I Assembler instruction, no errors 

C I Comments* 

J I Error in a machine instruction 
statement 



These bytes will contain error flags to 
indicate the type of error encountered 
during the translation of the instruction. 
If no error is encountered, the bytes will 
be blank. The error flags and their mean- 
ings are shown in Phase I, Section 3, 
"Subroutine Description," under the discus- 
sion of subroutine ERR. 



Error in an Assembler instruction 
statement 



OPERATION CODE TABLE 



L i Error, statement not assembled* 

M I Error, operand field assembled as 
zeros 

j. i _ ^ 

* Error flags printed but no further 
translation by Phase II 

L-. J 

After it is determined whether the oper- 
ation code is a machine instruction, an 



The Operation Code Table is divided into 
five sections, each section containing all 
the symbolic codes of the same length 
(e.g., all one-character symbolic codes in 
one section, all two-character symbolic 
codes in another section, etc.) plus the 
equivalent machine-language code. All sym- 
bolic codes within each section are also 
grouped according to the operand field 
format (e.g., all machine instructions in 
the SI Format, SS Format, etc.) 
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3| 4 



5| 6 



I I I I I I I I I I I I i I I I I 
7| 8| 9|10| 11|12|13|14| 15| 16|17| 18|19|20|21|22|23|24 

I I I I I I I I I I i I I I I I I 



H 



OP 



R2 



R1 



OP 



X2 



R1 



OP 



R3 



R1 



D2 
D2 



I B2 I 
I B2 I 



OP 



D1 



I B1 I 



OP 



L2/L 



LI 



D1 



I B1 I 



D2 



B2 



ICNOP 



E3 



|ba 



d1 



d2 



JICTL 



ED 



I EJECT 



EB 



j. 

I SPACE 

I- 

I ORG 



E7 



E8 



rx 



^ 



I END 



EF 



rx or blank 



|EQU 



E5 



ax or rx 



h 



I USING 



E6 



sx 



I DROP 



EC 



SX 



\- 

i EXTRN 



E9 



f 

I START 



I ENTRY 



EA 



EE 



Iba 



as 



ICCW 



E4 



SX 



rx 



SX 



I SX I 



IDS 
j. 



EO 



l|ba 



|DC(C,D,E,F,H,X) 



E1 



l|ba 



m I 



dc 



I DC (A) 



E2 



llba 



ax or rx 



I COMMENTS 



lErr.Mach.Instr, 



OP 



same as Type A 



le.f. 



jErr.Assem.Inst, 



OP 



same as Type B 



le.f , 



^ 

I error flags 

^ 

I error flags 
4 



I ERR (1) 



|ERR (2) 
k 



M|OP| n\ 



I aa = assembled address d = 

I as = actual sym.bol dc = 

I ax = absolute expression e.f, 

I ba = boundary alignment bits 1 = 



Legend 

decimal integer n = 
defined constant 

= error flags rs = 

length of constant rx = 

duplication factor sx = 



number of bytes of 
zeros to be assembled 
relocatable symbol 
relocatable expression 
simple expression 



(1) statement not assembled 



(2) operand assembled as zeros 



Figure 5. Intermediate Text Summary 
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The organization of this table allows a 
faster assembly because it is not necessary 
to search the entire table to find the 
equivalent machine-language code. Only the 
section of the table containing the same 
number of characters as the symbolic code 
is searched. In addition, the table pro- 
vides the Assembler Program with the oper- 
and field format and the address of the 
subroutine necessary to translate that for- 
mat. 

The machine-language operation code 
obtained from the table is placed into the 
Intermediate Text. 

The Operation Code Table is loaded into 
main storage as part of Phase I. 



SYMBOL TABLE 



The Symbol Table is divided into two 
sections. The first section contains the 
compressed symbols from the source state- 
ments; the second section contains the 
attributes (values) associated with each 
symbol. Only the attributes are passed on 
to Phase II because there is no further 
need of the symbol itself once it has been 
replaced with the address of the location 
within the Symbol Table that contains the 
symbol attributes. 

The first two entries in the Symbol 
Table refer to the location counter. The 
first entry contains the current setting of 
the location counter. This entry is neces- 
sary because the current setting of the 
location counter can be referred to within 
the symbolic program with an asterisk. For 
example, the expression (*+12) in the oper- 
and field of a symbolic statement refers to 
the current location plus 12 bytes. There- 
fore, when an asterisk is encountered as a 
symbol, the Assem.bler Program replaces the 
asterisk with the address contained in the 
first entry of the Symbol Table. 

The second entry contains the highest 
value the location counter reached during 
Phase I. This location is needed for the 
producing of an External Symbol Dictionary 
(ESD) START card, which is used by the 
relocatable loader. This is a function of 
Phase II and is discussed in detail in the 
introduction to Phase II. 



Location 



This is a two-byte field containing 
machine address of the symbol. 



the 



Length 



This is a one-byte field containing the 
number of storage bytes associated with the 
symbol. This number will always be one 
less than the actual number due to program- 
ming considerations. For example, if the 
symbol DATA is the name of the DS instruc- 
tion that defines a data area of 16 bytes, 
DATA would have a length of 15 assigned to 
it in the Symbol Table. When a length is 
not indicated, the Assembler Program 
assumes a length of one byte. 

If the symbol is defined by a compound 
expression, the length is the same as the 
implied length of the leftmost simple 
expression in the compound expression. If 
the leftmost expression is a self-defining 
value, the length attribute is one. 



Relocatability 



This four- bit (1/2 byte) field contains 
a 1 - 15 if the symbol is relocatable and a 
zero if the symbol is not relocatable 
(i.e., is assigned an absolute address). 

If the symbol is a linkage symbol that 
has been defined in the operand field of an 
EXTRN instruction, the relocatability field 
will contain a value from 2 to 15, depend- 
ing upon which EXTRN instruction in the 
source program defines the symbol. For 
example, if the symbol was defined by the 
first EXTRN instruction, the relocatability 
value would be 2. If it was defined by the 
second EXTRN instruction, the relocatabili- 
ty value would be 3, etc. If the symbol is 
defined in the same program and not in the 
operand field of an EXTRN instruction, the 
relocatability attribute will be one. 



The format of the Symbol Table Cards 
produced by Phase I is shown in Figure 6. 

The attributes assigned to a symbol when 
the symbol is defined in the Symbol Table 
are as follows: 



Defined Bit 



Each Symbol Table entry also contains 
one bit to indicate whether or not the 
symbol was ever defined. 
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1| 2 3 4 I 5-16 I 17-28 | 29-40 | 41-52 | 53-64 | 65-76 1 77 - 80 



12 1 Address of | | | | | | | 

9|first loc. I* i * I ♦ I * I* I * I Blank 

4 1 of Phase II | | | | | | | 

I Symbol Table | I I I I I I 

L . . J 

* Each of these 12 bytes contains the symbol name, value, and attributes as follows: 

Byte Contents 

1-2 Pointer to symbol position in table 

3-4 Not used 

5-8 Symbol in compressed form 

9-10 Symbol value 

1 1 Symbol length 

12 Symbol attributes 

bits 0-3 relocatability 
bit 4 defined bit 

1 = defined 

= undefined 
bit 5 1 = entry used 

= not an entry or entry not defined. 



L« 



J 



Figure 6. Symbol Table Card Format 
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SECTION 3: SUBROUTINE DESCRIPTION 



This section describes the subroutines 
of the Assembler Program that are used 
during Phase I processing. 



EVE - Evaluation Routine (Charts AM and AN) 



This subroutine is used during Phase I 
of the Assembler Program to accomplish the 
following: 



1. Scan the Name Field 

2. Scan for non-blank character 

3. Scan the Operation Code Field 

4. Translate the Operand Field 

The first three items mentioned above 
are discussed in detail in Section k, 
"Phase I Processing Flow," under "Control 
Routine." Only the translation of the 
operand field will be discussed here. How- 
ever, the parameters necessary for each of 
the above procedures are shown at the end 
of this discussion. 



This subroutine is shown 
Charts AM and AN. 



in detail in 



Subroutine EVE will scan the operand 
field until the first character of the 
operand field expression is located. Sub- 
routine EVE then translates the first term 
of the operand field expression and com- 
pares the translation to the parameters 
described below. The translated results, 
if correct, are placed into the relevant 
bytes of the Intermediate Text by subrou- 
tine STORE. 

If the translation is not correct, con- 
trol exits from this subroutine via the 
error exit set up by the calling routine. 

After the translated term is placed into 
the Interisediate Text, control exits to the 
calling routine. The calling routine then 
determines if the character following the 
term is correct. If it is correct, and 
more terms of the operand field need trans- 
lation, new parameters are set up and 
subroutine EVE is entered again. 

The parameters used by subroutine EVE, 
which describe the next term of the expres- 
sion in the operand field to be translated, 
are as follows: 

T is set according to the type of term to 
be translated as follows: 



= operand should be blank 

1 = a simple term 

2 = a compound term 

3 = an integer (decimal value) 

L indicates the number of bytes of inter- 
mediate text the term being translated 
will occupy. 

M indicates the maximum value allowed for 
any self-defining value within the 
expression being translated. 

PC indicates the starting column minus 2 

(due to programming considerations) of 

the Intermediate Text into which the 

translated term of the expression will 

be placed. 

C indicates the operation code of the 
statement being translated or the oper- 
ation to be performed by subroutine 
EVE, as follows: 

10 = CNOP 

20 = EXTRN 

20 = ENTRY 

40 = Name Field or Operation Code scan 

60 = DS or DC (type C,D,E,F,H,X) , 
EJECT, SPACE, or scan until non- 
blank character 

80 = END 

90 = ORG or EQU 

AO = START 

BO = DC (type A) , USING, DROP, or CCW 
(2nd term) 

00 = all other operation codes 



The other subroutines used by subroutine 
EVE are: 

DCC - Define Character Constant: This sub- 
routine is used when a character constant 
appears in the operand field of a source 
statement. It translates the character 
constant and checks its validity. 

DCF - Define Full-Word Constant: This 
subroutine is used when a full-word 
constant appears in the operand field of a 
source statement. It converts a decimal 
integer to its binary representation and 
checks its validity. 

DCX - Define Hexadecimal Constant; This 
subroutine is used when a hexadecimal con- 
stant appears in the operand field of a 
source statement. It translates the hexa- 
decimal constant and checks its validity. 

TLUS - Symbol Table Look-up: This subrou- 
tine is used when a symbol appears in the 
operand field of a source statement. It 
looks up the symbol in the Symbol Table and 
indicates its value (if known) , its loca- 
tion in the Symbol Table, its length and 
relocatability attributes, and the bit 
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indicating whether or not the symbol is 
defined. 



STORE ~ Store into Intermediate Text; This 
subroutine stores the translated terms of 
the expression in the operand field into 
the Intermediate Text. 



r T- 

I Flag I 

h 



Meaning 



ERR - Store Error Flags 



The ERR subroutine places the necessary 
error flags into the Intermediate Text. If 
the error is such that the statement can 
not be assembled by Phase II ^ ID-Code L is 
also placed into the Intermediate Text. 
This subroutine is entered from the calling 
routine at location ERR if it is necessary 
to place the ID-Code into the Intermediate 
Text along with the error flags. If onlj^ 
the error flags are to be placed into the 
Intermediate Text, this subroutine is 
entered at location ERR1. The error flags 
are dependent upon the error conditions and 
are set by the calling routine. 



The error flags that may be placed into 
the Intermediate Text by Phase I are shown 
in Figure 7. 



Figure 8 shows what action is taken in 
Phase I of the Assembler Program when 
errors are encountered in the source state- 
ment. 



* A 
B 

C 

E 



G 
J 
L 
M 

* N 


* R 

* S 

* T 
V 

* Y 

Z 



Expression not simply relocatable 

START r EXTRN, ENTRY, or ICTL out 
of order 

Location counter overflow 

More than 14 EXTRNs or more than 
100 ENTRIES 

Operand field form.at error or 
self -defining value in operand 
field too large 

DC D or E range error 

Symbol Table full 

Name field error 

Multiple defined symbol 

Statement not used 

Invalid operation code 

Expression not absolute 

Specification error 

Value too large 

ORG or EQU symbol not previously 
defined 

Negative expression 

Column 72 not blank 



k 

I* May also be set by Phase II. 

L 

Figure 7. Error Flags 



BAR - Boundary Alignment Routine 



The BAR subroutine is used to align the 
location counter to the proper word bounda- 
ry, if necessary. 



This subroutine will interrogate the 
boundary alignment bits of the Intermediate 
Text (byte 4) and, if necessary, add to the 
location counter the number of bytes that 
will align it to the proper word boundary. 

After the location counter is increment- 
ed, it is tested to see if it exceeds the 
maximum allowable value of 65,535. If it 
does, the location counter is truncated and 
an error flag is placed into the Intermedi- 
ate Text. 



STORE - Store into Intermediate Text 



The STORE subroutine is used to store 
the translated expressions of the operand 
field into the Intermediate Text. 

This subroutine will store, one byte at 
a time, the translated terms of the expres- 
sion in the operand field into the correct 
bytes of the Intermediate Text. The cor- 
rect byte is determined by adding the value 
of the input parameter PC, which is set to 
the starting byte (minus 2) into which the 
translated term is to be placed, to the 
length of the translated term. 

Therefore, the translated term is placed 
into the Intermediate Text beginning with 
the low-order byte of the field of the 
Intermediate Text associated with the term. 



Phase I 
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r — 


INSTRUCTION 


1 


1 

NTVME FIELD ERROR j 

(Error Flag Set 


- - - - T 

OPERAND FIELD ERROR | 
For All Instructions) | 


L 


All Machine 
Instructions 


t 


Symbol stored 
in Symbol Table 


1 


Indicate how many bytes of zeros | 
are to be assembled by Phase II | 
for the operand field j 




CCW 


T 
X 


Symbol not stored 
in Symbol Table 


X 


Indicate how many bytes of zeros | 
are to be assembled by Phase II | 
for the operand field | 


1 

1 


CNOP 


t 
X 


Symbol ignored 


Statement ignored | 


1 
1 _ 


DC 


T 
1 


Symbol not stored 
in Symbol Table 


t 
1 


Statement ignored | 
Undefined symbol in type A will j 
set operand field to zero j 


1 

1 


DROP 
DS 


T 
. X 


Symbol ignored 

Symbol not stored 
in Symbol Table 


-+ — 

X 


Statement ignored j 


L _ 


Statement ignored | 


1 

1 


EJECT 


T 
. X 


Symbol ignored 


t 


Symbol ignored | 


1 

1 


END 


t 
. X 


Symbol ignored 


+ 


No ENTRY point to this program | 
will be defined | 


i 

1 


ENTRY 


t 
- 4- 


Symbol ignored 




Statement ignored | 


1 


EQU 


t 
. X 


Statement ignored 


X 


Statement ignored | 


1 

1 


EXTRN 


t 
X 


Symbol ignored 


t 
X 


Statement ignored j 


1 

L - 


ICTL 


t 
. X 


Symbol ignored 


T 
X 


Operand set to a 1 in a tape system j 
and to 25 in a card system | 


i 


ORG 


T 
. X 


Symbol ignored 




Statement ignored | 




SPACE 


T 
X 


Symbol ignored 


T 


If not a decimal value, statement j 
ignored j 


r 


START 


T 


Symbol not stored 
in Symbol Table 




Location counter set to zero | 



USING 



L X- 

Figure 8. Error Summary 



Symbol ignored 



I 
.x_ 



Statement ignored 



BUMP - Increment Location Counter 



The BUMP subroutine is used to increment 
the location counter by the required number 
of bytes and to indicate if the location 
counter exceeds the maximum allowable value 
of 65,535. 



This subroutine is entered with the 
parameter VALUE indicating the amount the 
location counter is to be incremented by or 
reset to. It is entered with parameter 
ADJUST BIT set to a zero if the location 
counter is to be incremented; parameter 
ADJUST BIT set to a one if the location 
counter is to be reset. 



After the source statement is translated 
and placed into the Intermediate Text, the 
location counter is incremented by the 
number of bytes determined by the operation 
code of the statement. The location coun- 
ter is incremented (after boundary 
alignment) as shown in Figure 9. 



After the location counter is increment- 
ed or reset, it is tested to see if it 
exceeds the maximum allowable value. If it 
does, the location counter is truncated and 
an error flag is placed into the Intermedi- 
ate Text. 
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The BUMP subroutine also places the 
highest value the location counter reached 
during Phase I of the assembly into the 
second entry of the Symbol Table. 



^ ^ 

1 Instruction 
1 Type 


r 

Location Counter 
Incremented by 


1 RR Format 


2 bytes 


1 RX,RS,SI 
1 Format 


a bytes 


1 SS Format 


6 bytes 


1 ORG 


Reset to the value of the 
translated operand field 


1 START 


Translated operand field 
expression after alignment 
to a double-word boundary 


1 CCW 


8 bytes 


1 CNOP 


Depends upon the current 
setting of the location 
counter and the translated 
operand field expression 


1 DS 


Translated operand field 
expression 


1 DC 


Length of the constant mul- 
tiplied by the duplication 
factor 



J. 



J 



Figure 9. Increment Values 



TLUN/TLUS - Symbol Table Procedures 



This subroutine is used during Phase I 
to build the Symbol Table and enter the 
attributes of each symbol into the Symbol 
Table. The subroutine has two entry points 
as follows: 

1. TLUN - used when a symbol is encoun- 
tered in the name field 

2. TLUS - used when a symbol is encoun- 
tered in the operand field 

The symbol entry point in the Symbol 
Table is determined by dividing the com- 
pressed symbol by the length of the Symbol 
Table. The remainder is added to the 
starting location of the Symbol Table, and 
this sum is used as the entry point within 
the Symbol Table. 

Thus, it can be seen tha^ it is possible 
for more than one symbol to have the same 
entry point. A different symbol, there- 
fore, may already have been entered into 



the Symbol Table at this entry point. When 
this mismatch occurs, the Symbol Table is 
searched (from the entry point down) until 
a match occurs or until the next empty 
location is found. 

The symbol name is reduced from 48 to 32 
bits as follows: 

1 . The first two bits of each character 

(always ones) are disregarded; 

2. The next two bits of each character 
are saved, as the first 12 bits of the 
32-bit reduced symbol name; 

3. The remaining four bits of each char- 
acter are converted to decimal and 
then, as a six-digit decimal number, 
this group is converted to binary and 
stored as the remaining 20 bits of the 
32-bit reduced symbol name. 

TLUN; The symbol entry point within the 
Symbol Table is checked. If the symbol has 
already been entered into the Symbol Table 
at this location, a check is made to 
determine if the symbol is defined. If the 
defined bit is a one, the symbol has been 
previously defined and error flag M is 
placed in byte 24 of the Intermediate Text. 

If the defined bit is zero, the symbol 
has not been previously defined, and the 
attributes associated with the symbol are 
entered into the Symbol Table at this 
location. The defined bit is then set to a 
one. 

If the symbol is not in the table at 
this location, and the location is empty, 
the symbol and its attributes are entered 
into this location. The defined bit is 
then set to a one. 

If the symbol is not in the table at 
this location, and the location is not 
empty, a search of the Symbol Table is made 
to determine if the symbol was previously 
entered or to locate the next empty loca- 
tion within the table. If the symbol was 
previously entered at a different location, 
and the defined bit is not a one, the 
attributes associated with the symbol are 
entered into that location and the defined 
bit is set to a one. If the defined bit is 
a one, the symbol has been previously 
defined, and error flag M is placed into 
the Intermediate Text. If the symbol has 
not been previously entered into the Symbol 
Table, the symbol and its associated attri- 
butes are entered into the next empty 
location in the Symbol Table, and the 
defined bit is set to a one. 

If the Symbol Table is completely 
scanned before the symbol or an empty 
location is found, error flag J is placed 
in byte 24 of the Intermediate Text to 
indicate that the Symbol Table is full. 
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This symbol r and any other symbol following 
that is not already entered into the Symbol 
Table y will remain undefined. 

TLUS; The symbol entry point within the 
Symbol Table is checked. If the symbol has 
already been entered into the Symbol Table 
at this location^ a pointer to this loca- 
tion is placed into the relevant bytes of 
the Intermediate Text. 

If the symbol is not in the table at 
this location y and the location is empty ^ 
the symbol is entered into this location. 
Since the symbol is from the operand fields 
none of the symbol attributes are known at 
this time. Therefore^ the remainder of the 
table entry for this symbol remains blank. 
The attributes for the symbol will be 
placed into the Symbol Table when the 
symbol is encountered in the name field of 
a source statement. A pointer to this 
location is then placed into the relevant 
bytes of the Intermediate Text. 

If the symbol is not in the table at 
this location^ and the location is not 
empty ^ a search of the Symbol Table is made 
to determine if the symbol was previously 
entered or to locate the next empty loca- 
tion within the Symbol Table. If the 
symbol was previously entered at a differ- 
ent location, a pointer to that location is 
placed into the relevant bytes of the 
Intermediate Text. If the symbol has not 
been previously entered into the Symbol 
Table, the symbol is entered into the next 
empty location in the Symbol Table, and a 
pointer to that location is placed into the 
relevant bytes of the Intermediate Text. 

If the Symbol Table is completely 
scanned before the symbol or an empty 
location is found, error flag J is placed 
in byte 24 of the Intermediate Text. 



INPUT - Input/Output Subroutine (CHARTS AO 
and AP) 



This subroutine is the same for both 
Phase I and Phase II. It controls all the 
I/O operations for the Assembler Program. 

The subroutine is entered at location 
INOUT from the calling routine. The inter- 
rupts are disabled and the CAW and device 
address are stored (02-04) . 

The I/O device is then tested for the 
following conditions (05) : 

1. Device unavailable. This is an error 
condition and an error halt occurs. 
The SEREP ID code for the unavailable 
device is set and the device address 



is stored in the old 
and 3) . 



lOPSW (bytes 2 



2. Device busy. The program goes into an 
internal loop until the device is 
ready. When the device is ready, a 
test is made to determine if the CSW 
is stored. 

3. CSW stored. Control is transferred to 
the interrupt routine. 



The condition codes and 
are as follows: 



their meanings 



Condition code 

1 

2 
3 



Meaning 

Available 

CSW stored (Immediate 

operation) 
Busy 
Unavailable 



When the device is available and ready, 
an attempt is made to start the I/O opera- 
tion. Two procedures are possible as fol- 
lows : 

1 . The device is started and the data 
transfer initiated. Interrupts are 
enabled, and the program enters a wait 
state until an interrupt occurs 

(06-07) . When an interrupt occurs, 
either as a result of the current SIO 
or from a previous SIO, the interrupt 
procedure is initiated. The interrupt 
entry switch is set (except when a 
busy condition was cleared by a TIO 
operation) , and a Retry switch is 
tested (09-10) . 

2. The device is started for an immediate 
operation (rewind, skip) , the inter- 
rupt procedure , is initiated, and the 
Retry switch is tested. 

The Retry switch is tested and if this a 
tape-positioning operation (backspace, 
skip) or sensing operation resulting from 
the error correction procedure, control is 
transferred to the error correction proce- 
dure. 

If the Retry switch is not on, the read 
switch is set if this is a read operation, 
and the error conditions are checked 

(11-12). If it is a channel error, the 
SEREP ID code and the recovery address in 
the external New PSW are set and the 
program enters a wait state with AIS in the 
location counter (13-33-28) . If it is a 
unit error and the unit is not tape, the 
SEREP ID code for device failure is set, 
the recovery address is set in the external 
New PSW, and the program enters a wait 
state with AIS in the location counter 

(14-34-28) . If there is a unit error, and 
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the unit is tape, control is transferred to 
the error correction procedure (AP-A2) . 

If there are no errors, the busy indica- 
tor is checked (15) . If the busy indicator 
is on, control is transferred to the inter- 
rupt procedure to check the Retry switch. 

If the error switch was set on this 
pass, it is cleared and the registers 
restored before EOF and other exceptional 
conditions are checked. 

If there are no exceptional conditions, 
control is returned to the calling routine. 
If an exceptional condition is caused by 
the printer, it is ignored, and control is 
returned to the calling routine; otherwise 
the error halt occurs and the recovery 
address is placed in the external New PSW 
(32) . 

Error Recovery Procedure; This procedure 
is entered for a tape error only. The 



Retry switch is set and the I/O Old PSW, 
CSW, and CAW are saved (01) . The sense 
bytes are requested and the original condi- 
tions are restored (02-04) . 

If the sense information is a unit 
check, a test is made to determine if it is 
a first read error (05-06) . If it is, the 
error switch is turned on. If it is not a 
first error, the read switch is checked and 
10 read retries are made. If the read 
attempt is still not successful, an error 
halt occurs and a standard device failure 
message is produced. 

If it is a write failure, three rewrite 
and skip operations occur three times 
before an error halt occurs and a standard 
device failure message is produced. 

Note; The error recovery procedure des- 
cribed above does not conform to IBM stand- 
ards; i.e., no priority checking or tape 
cleaning is implemented. 
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SECTION 4; PHASE I PROCESSING FLOW 



CONTROL ROUTINE - CHART 04 



This section uses three charts to des- 
cribe the overall processing flow of Phase 
I of the Assembler Program. Chart 03 
illustrates the initialization procedures , 
and Charts OU and 05 illustrate the Control 
Routine. The numbers in parentheses within 
the text describing each chart indicate the 
block on the chart being explained. 



INITIALIZATIOl - CHART 03 



Phase I of the Assembler Program is read 
into main storage (01) . The addressability 
and main storage size, as determined by the 
Phase I Configuration Card, are set up, and 
the necessary control parameters to be used 
by the subroutines of Phase I are generated 
and stored (02-03) . 

The Configuration Card is discussed in 
detail in the publication, IBM System/360 
Basic Programming Support Operating Guide 
for Basic Assembler and Utilities , Form 
C28-6557. 

The area reserved for the Symbol Table, 
determined by the size of main storage, is 
cleared, and the first two entries are 
reserved for the uses indicated in Section 
2, "Tables" (04) . 

The input/output addresses are deter- 
mined and set up for the read and write 
routines. These addresses are determined 
by the intermediate text device being used 

(card or tape) . The size of the Intermedi- 
ate Text to be written or punched as output 

(24 bytes for a card intermediate text 
system, 104 bytes for a tape intermediate 
text system) is stored into the necessary 
locations of the write routine (05-12) . 
The first source statement is then read in 

(13) . 

In a card intermediate text system, if 
column 1 of the first card indicates it is 
a Symbol Table card (14) , the Symbol Table 
deck is read into the area of main storage 
reserved for the Symbol Table (15) . The 
use of the Symbol Table deck is discussed 
in detail in the publication, IBM 
System/3 60 Basic Programming Support Basic 
Assembler Language , Form. C28-6503. 

After the last card of the Symbol Table 
deck is read into main storage, or when the 
Symbol Table deck is not present, control 
exits to the Phase I Control Routine (Chart 
04) . 



The first statement of the source pro- 
gram is read in (01) . The first column of 
the card to be scanned by the EVE subrou- 
tine (determined by the SYSCON control byte 
of the Phase I Configuration Card) is set, 
the control switches are set, and the punch 
buffer output area is cleared (02) . 

Column 72 of the source program state- 
ment, which must be blank, is tested (03) . 
If it does not contain a blank, error flag 
Z is placed in byte 22 of the relevant 
Intermediate Text (04) . Any information 
contained in column 72 is ignored when the 
source statement is processed, but column 
72 is printed as part of the source state- 
ment in the program listing. 

The first column of the source statement 
is tested for an asterisk or a blank 
(05-06). If the source statement begins 
with a blank, the operation code is then 
checked (11). If the column contains an 
asterisk, ID-Code C, indicating the source 
card is a comments card, is placed in byte 
1 of the Intermediate Text. No further 
translation of the source statement is 
performed during the assembly process. A 
comments card is only reproduced in the 
object program listing. 

If the statement begins with neither an 
asterisk nor a blank, it indicates that the 
source statement begins with a symbol in 
the name field. The symbol in the name 
field is scanned by subroutine EVE to 
determine if it is valid (08) . If the 
symbol is valid (i.e., begins with an 
alphabetic character and contains no more 
than six characters) , the valid-symbol 
indicator is set. However, the symbol is 
not placed into the Symbol Table at this 
time. A symbol in the name field of the 
source statement being translated may not 
be allowed. Until this can be determined, 
the symbol is only temporarily stored (09) . 
If the symbol is not valid, error flag L is 
placed in byte 24 of the Intermediate Text 

(10) . The operation code is then checked 

(11). 

If the operation code field of the 
source statement is blank (the remainder of 
the source statement is blank) ID-Code L, 
indicating the statement is not to be 
assembled as part of the object program, 
and error flags NO are placed in bytes 1, 
23, and 24, respectively, of the Intermedi- 
ate Text (17) . If the remainder of the 
source statement is not blank, but the 
operation code has been om.itted, the first 
characters of the operand field or comments 
field will be treated as the operation 
code. Control then exits to produce the 
Intermediate Text (Chart 05, block F2) . 
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If the operation code field contains an 
operation code^ the Operation Code Table is 
searched to determine if the operation code 
is valid (12) . If the operation code is 
not valid, ID-Code L, indicating the state- 
ment is not to be assembled as part of the 
object program, and error flags N and O are 
placed in bytes ^, 23, and 2U, respective- 
ly, of the Intermediate Text (17) . The 
next source program statement is then read 
in (01) . 



If the operation code contained in the 
source statement is found during the search 
of the Operation Code Table, it is checked 
for type (14) . If it is a machine opera- 
tion code, ID-Code A is placed in byte 1 of 
the Intermediate Text, and the location 
counter is aligned to a half-word boundary 
(18-19) . Control then exits to the subrou- 
tine necessary to translate the operand 
field as determined by the operation code. 

If the operation code indicates an 
Assembler Instruction, ID-Code B is placed 
in byte 1 of the Intermediate Text and 
control exits to the subroutine necessary 
to translate the operand field as deter- 
mined by the operation code. (See Section 
5, "Operand Field Translation.") 

Subroutine EVE is used to translate the 
operand field of each statement. The 
translation of each operand field by sub- 
routine EVE is basically the same regard- 
less of the type of statem.ent. This sub- 
routine is, however, entered with different 
parameters for each statement type. These 
parameters are shown in the description of 
subroutine EVE in Section 3, "Subroutine 
Description." 

Each expression within the operand field 
is translated separately and placed in the 
relevant bytes of the Intermediate Text for 
that statement. 

If an error is encountered in the oper- 
and field, the remaining expressions within 
the operand field are not translated. The 
intermediate text that has been developed 
up to that point, however, is written as 
Intermediate Text with the relevant ID-Code 
and error flags. The ID-Codes used in the 
Intermediate Text are discussed in the 
description of the Intermediate Text in 
Section 2, "Tables." The error flags and 
their meanings are shown in Section 3, 
"Subroutine Description," under subroutine 
ERR. These flags are also shown in Figure 
3. 

If an error is encountered during the 
translation of the operand field such that 
the statement will not be assembled by 
Phase II (20) , control exits to produce the 
Intermediate Text (Chart 05, block F2) . If 



not, control exits to Chart 05, block B2, 
to process the nam.e field. 



CONTROL ROUTINE - CHART 05 



The valid-name indicator (set if the 
symbol in the name field was valid) and the 
name-allowed indicator (set by the operand 
translation subroutine if a symbol in the 
name field of the source statement being 
translated is legal) are tested (01) . 

If neither indicator is set, byte 24 of 
the Intermediate Text is tested to deter- 
mine if an invalid symbol (error flag L) 
was in the name field (05) . If byte 24 is 
blank, control transfers to produce the 
Intermediate Text (09) . If byte 24 con- 
tains error flag L, the ID-Code indicating 
an error is placed in byte 1 of the 
Intermediate Text , replacing the ID-Code 
already there (04) . Control then transfers 
to produce the Intermediate Text (09) . 

If one indicator is set, the valid-name 
indicator is checked (02) . If the valid- 
name indicator is not set, the procedures 
described above for neither indicator set 
are followed (05) . If the valid-name 
indicator is set but not the name-allowed 
indicator, the ID-Code indicating an error 
is placed in byte 1 of the Intermediate 
Text replacing the ID-Code already there 
(04) . It is possible that the symbol in 
the name field of this source statement is 
referenced in the operand field of another 
source statement. If this is the case, the 
source statement referencing this symjDol 
will contain an error flag, indicating an 
undefined symbol because this symbol is not 
placed into the Symbol Table. Flagging 
both statements will make the error easier 
to locate. Control then transfers to pro- 
duce the Intermediate Text (09) . 

If both indicators are set, indicating 
there is a valid symbol in the name field 
and a name is allowed for the source 
statement being translated, the value of 
the location counter is placed into the 
value attribute of the symbol in the Symbol 
Table (06) . 

If an error is encountered by subroutine 
TLUN while placing the symbol into the 
Symbol Table (e.g.. Symbol Table is full) , 
the ID-Code indicating an error is placed 
in byte 1 of the Intermediate Text along 
with the error flag placed by subroutine 
TLUN, replacing the ID-Code already there. 
Control then transfers to produce the 
Intermediate Text (09) . 

If no error is encountered by subroutine 
TLUN (08) , control transfers to produce the 
Intermediate Text (09) . 
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Depending upon the configuration of the 
system being used to assemble the program, 
one of the following three procedures, 
along with the common procedure, is fol- 
lowed . 



Tape Procedure (blocks 09, 12-14) : 
Intermediate Text is written on tape. 



The 



1442 Card Read Punch Procedure (blocks 10, 
14, 20-21) : If the information in the 
first 24 columns of the source card is 
equal to the information in the Intermedi- 
ate Text (10) , this is a reassembly, and 
the punching of the Intermediate Text is 
not necessary since the source card already 
contains the record for that statement. 
Control then transfers to test for an END 
card (15) . 

If the information is not equal (10) and 
the first 24 columns of the source card are 
blank (20) , the Intermediate Text is 
punched into these columns (14) . 

If the information is not equal (10) or 
the first 24 columns of the source card are 
not blank (20) , the punch buffer is blanked 
and a '9' is placed into column 1 of the 
Intermediate Text . If the system has a 
printer or typewriter, the '9' is punched 
into the card, and error flag N will be 
printed in the listing produced by Phase 
II. If no printer or typewriter is avail- 
able, the system stops. A manual interrupt 
will cause processing to be resumed; the 
'9' is punched into column 1 of the card 
(14) , and processing continues. 



2540 Card Read Punch Procedure (blocks 09, 
12-14; The Intermediate Text is moved to 
the output area, if necessary, and punched 
into the first 24 columns of a blank card. 
Then the first 48 columns, the 
Identification-Sequence Field, and column 
72 of the source card are punched into the 
remaining columns of the new card. 

Common Procedure (blocks 11, 15-19) ; After 
the Intermediate Text is written or 
punched, a test is made to determine if the 
statement just translated was an END state- 
ment (15) . If it was not, the location 
counter is incremented by the size (number 
of bytes) ,of the statement (11) , and con- 
trol exits to read the next source state- 
ment (Chart 04, block 01) . 

If the statement is an END statement 
(15) , and a card intermediate text system 
is being used (16) , the Symbol Table Deck 
is punched into the blank cards following 
the source program (17) . If a tape inter- 
mediate text system is being used, it is 
not necessary to punch the Symbol Table 
Deck because Phase II must immediately 
follow Phase I. 



In either case, the attributes of the 
Symbol Table are relocated to upper main 
storage (18). (See description of Symbol 
Table in Section 2, "Tables.") The message 
1EA is printed (19) , and the program waits 
for Phase II to be loaded. However, if the 
assembler was loaded from tape, the message 
1EA is not printed, and Phase II is loaded 
immediately. 
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SECTION 5; OPERAND FIELD TRANSLATION 

This section discusses the translation of the operand fields of each 
different instruction format. A chart of the logic flow is given for each 
type. The reader will require a basic knowledge of the subroutines described 
in Section 3, "Subroutine Description," before using this section. 



ASSEMBLER INSTRUCTION STATEMENTS 



CCW Translation - Chart AA 



The CCW instruction provides a convenient way to define and generate an 
-byte Channel Command Word aligned to a double-word boundary. 

The source statement format is as follows : 



J. ^ ^^ ^ 

I NAME ■ I OPERATION | OPERAND j 

|. 1 _.^| ^ _ ^ 

I Optional | CCW | Four expressions separated by commas | 

^ J. X ^ 

I Where the four expressions, from left to right, are: | 

I A simple absolute expression specifying the command code j 

I A relocatable expression specifying the data address j 

I A simple absolute expression specifying the flags and bits 37-39 j 

A simple absolute expression specifying the count j 



L- 



This subroutine is entered at location CCW (block AA01) from the Phase I 
Control Routine. It translates the operand into intermediate text meaningful 
to Phase II of the Assembler Program and returns control to location C311 in 
the Phase I Control Routine (Chart 04) . 

The format of the Intermediate Text is as follows: 

^ ^ __^ ^ ^ ^ ^ ^ 

BYTE I 1*1 I I I 

1 I 2 I 3-4 I 5-16 I 17-20 | 21-22 | 23-24 
^ ^. 1 1 1 1 1 ^ 

ID-code I Internal | Translated] Translated (Translated (Translated] Error 
I code of I first j second | fourth | third | flags 
I instruction j expression j expression | expression | expression j 
I (E4) I I I II 

|. ± J. X X i X ^ 

* Byte 3 contains the number of bytes of zeros to be assembled by Phase II 
if an error is encountered. 

L ^ . J 

The bit patterns of the translated expressions placed into the Intermediate 
Text are as follows: 
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First expression ; 



Where: P = if the expression is a self -defining value 
P = 1 if the expression is a symbol 

L = since field N will contain something other than a blank 
N = a self-defining value or the location of a symbol within 
the Symbol Table 



Second expression ; 
r 






Bit 1 


2 3 4 5 - 8 9 - 16 17 - 24 25 - 32 


"] 


[P 


1 L 1 X 1 X 1 N 1 






>' V y v^ y V J 




Bytes 


5,9,13 6,10,14 7,11,15 8,12,16 


J 


Where: 


P and N have the same meanings as the first expression 
L = if field N contains something other than a blank 
L = 1 if field N contains a blank 

XX = 00 if the arithmetic operator preceding N is + 
XX = 10 if the arithmetic operator preceding N is - 
XX = 11 if the arithmetic operator preceding N is * 


1 



Third expression ; 

^ . . ^ 

I This expression has the same format as the first expression except | 
I bytes 21 and 22 are used. | 

L J 



Fourth expression : 

This expression has a format similar to the first expression except bytes 17 
through 20 are used. 

I Bit 12 3-8 9-16 17-24 25-32 | 

I | P|Li N I I 

I ^^ ^ ' N -,^^ » y y ' > y f I 

I Byte 17 18 19 20 | 

^ ^ ^ 

I Where: P, L, and N have the same meanings as the first expression | 

L J 



DC Translation - Chart AB 

The DC instruction is used for generating constant data in main storage. 
30 



The source statement format is as follows: 

r- T T 1 

I NAME I OPERATION j OPERAND | 

^ ^1 1 ^ 

I Optional | DC | dtLn'c' or ALn (c) j 

|. X X . ^.^ 

I Where: d is the duplication factor | 

I t specifies the type of constant j 

I Ln specifies the length of the constant j 

I c specifies the constant | 

L . J 



This subroutine is entered at location DC (block AB01) from the Phase I 
Control Routine. It translates the operand of the instruction into intermedi- 
ate text meaningful to Phase II of the Assembler Program and returns control to 
location C311 in the Phase I Control Routine (Chart 04). The format of the 
Intermediate Text is as follows: 





~T 


1 "■ 


— ~ ~T- 


T 




-^ ^_ 




BYTE 


1 * 


1 


1 


1 


♦ ♦ 


1 *** I 




1 


1 2 


1 


3 1 


^ 1 


5-6 


1 7-22 1 


23-2U 




-+ 


-+- 


+- 


— +- 








ID-code 


1 Internal 


1 


Constant | 


Boundary | 


Dupli- 


1 Translated! 


Error 




1 code of 


1 


length | 


alignment! 


cation 


1 constant ! 


flags 




1 instruction! 


1 


pattern | 


factor 


1 1 






-.X 


-X- 


X. 


. X-. 




_x X_- 





* E1 except- DC type A which is E2. 
** One if DC type A or not specified. 
*** Bytes 9-2 contain the translated expression for DC type A> and 
bytes 7, S, 2\ , and 22 are blank. 



The relocatable expression allowed for code type A may have a maximum of 
three terms. Therefore, bytes 9-20 are divided into three 4-byte fields. The 
bit pattern for each translated term is as follows: 



Bit 1 2 3 
I P I L I^T" 



9-16 



17-24 



25 - 32 



X 



Bytes 



9,13,17 



^ K^ 



J ^ 



10,14,18 11,15,19 12,16,20 



|. _ ^ ^ 

Where: P = if the term is a self-defining value 
P = 1 if the term is a symbol 

L = if field N contains something other than a blank 
L = 1 if field N contains a blank 

XX = 00 if the arithmetic operator preceding N is + 
XX = 10 if the arithmetic operator preceding N is - 
XX = 11 if the arithmetic operator preceding N is * 
N = a self-defining value or the location of a symbol within 
the Symbol Table 



CNQP Translation - Chart AC (Blocks 01-09) 

The CNOP instruction is used to align an instruction to a specific word 
boundary. 
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The source statement format is as follows: 



^ ^ . ^ ^ 

I NAME I OPERATION | OPERAND j 

^ + 1 „_^ ^ 

I Not used I CNOP j b,w j 

|. X X ^ 

I Where: b is a decimal value of 0, 2, 4 ^ or 6 | 

I w is a decimal value of 4 or 8 j 

^^ > ^ 

I The following combinations of b and w are valid: | 

I 0,4 2,8 I 

I 2,4 4,8 I 

I 0,8 6,8 I 

L . J 



This subroutine is entered at location CNOP (block AC01) from the Phase I 
Control Routine, It translates the operand of the instruction into intermedi- 
ate text meaningful to Phase II of the Assembler Program and returns control to 
location C311 in the Phase I Control Routine (Chart 04). 

The format of the Intermediate Text is as follows: 



r — 


— T 




_ y 




X — 




T 




— T — 




— T- 




-T- 


1 


JBYTE 


1 




1 




1 




1 




1 




1 




1 


1 


1 1 


1 


2 


1 


3 


1 


4 


1 


5-6 


1 


7-8 


1 


9-22 


1 


23-24 1 


|. 


--+ 




+— 




— +— 




— +- 




--+- 





-+- 





-+- 


J 



1 ID-code 1 Internal | 


Blank 


1 Boundary | 


Trans- | Trans- | Blank 


1 ErpDr 1 


1 1 code of 1 




1 alignment] 


lated 1 lated | 


1 flags 1 


1 1 instruction! 




1 pattern | 


value 1 value | 


1 1 


1 1 (E3) 1 




1 1 


of b 1 of w 1 


1 1 


L X X- 




-X X- 


X X 


-X J 



The boundary alignment bit pattern placed into byte 4 is as follows: 




Where: NNN =011 if alignment is to a full-word boundary (w = 4) 

NNN = 111 if alignment is to a double-word boundary (w = 8) 

MMM = 000 if location counter is to be set to byte of NNN (b = 0) 

MMM =010 if location counter is to be set to byte 2 of NNN (b - 2) 

iyiMM = 100 if location counter is to be set to byte 4 of NNN (b = 4) 

MMM = 110 if location counter is to be set to byte 6 of NNN (b = 6) 



PS Translation - Chart AD (Blocks 10-20) 



The DS instruction is used to reserve main storage 
symbolic names to the areas that are to be reserved. 



areas and to assign 
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The format of the source statement is as follows: 



J. ^ ^ ^ ^ 

I NAME I OPERATION | OPERAND j 

^ 1 1 .^ 

I Optional j DS | dtLn j 

^ ± ± ^ 

I Where: d is the duplication factor | 

I t is the type of field | 

I Ln specifies the length (valid for field code C only) j 

L . . . J 

This subroutine is entered at location DS (block AD10) from the Phase I 
Control Routine. It translates the operand of the instruction into intermedi- 
ate text meaningful to Phase II of the Assembler Program and returns control to 
location C311 in the Phase I Control Routine (Chart 04) . 

The format of the Intermediate Text is as follows: 



P ^ ^ ^ ^ ^ ^ ^ 

I BYTE I II i I I I 

I 1 I 2 I 3 I 4 I 5-6 j 7-22 | 23-24 | 
|. 1 1_„ 1 1 ^ 1 1 ^ 

I ID-code I Internal | Length | Boundary | Translated] Blank j Error | 

I I code of I of I alignment! value (d | | flags j 

I I instruction I Constant | pattern j times n) j | j 

I I (EO) I I I I I I 

L X JL X X X X J 



DROP Translation - Chart AD (Blocks 12-15) 

The DROP instruction specifies a previously available general register that 
is no longer available for base addressing. 

The source statement format is as follows : 



r T T 1 

I NAME I OPERATION j OPERAND | 

|. ^ 1 1 -I 

1 Not used I DROP | A simple absolute expression | 

L X X J 

This subroutine is entered at location DROP (block AD12) from the Phase I 
Control Routine. It translates the operand of the instruction into intermedi- 
ate text meaningful to Phase II of the Assembler Program and returns control to 
location C311 in the Phase I Control Routine (Chart 04) . 

The format of the Intermediate Text is as follows: 



J. ^ ^ ^ ^ ^ ^ ^ 

I BYTE I I I I I I 

I 1 I 2 I 3-16 I 17-20 I 21-22 | 23-24 | 
|. 1 1 1 1 ^ 1 ^ 

I ID-code I Internal | Blank | Translated | Blank j Error | 

I I code of I j operand | | flags | 

I I instruction j I I I t 

I I (EC) I I II I 

L X . X X X X^ J 

Phase I 33 



The bit pattern for the translated operand field placed into bytes 17-20 is 
as follows: 



Bit 



Bytes 



9-16 



17 - 24 



25 - 32 



I P I L I X I X I 



N 



-J ^ 



17 



18 



17-t: 



J ^ 



19 



20 



Where: P = if the operand is a self-defining value 
P = 1 if the operand is a symbol 

L = if field N contains something other than a blank 
L = 1 if field N contains a blank 

XX = 00 since the expression will always be positive 
N = a self-defining value or the location of a symbol within 
the Symbol Table 



EJECT Translation - Chart AD (Blocks 01-02) 

The EJECT instruction causes the next line of the object program listing to 
appear at the top of a new page. 

The source statement format is as follows: 



^ ^ , ^ ^ 

I NAME I OPERATION | OPERAND | 

^ 1 1 ^ 

I Not used I EJECT | Not used j 

L .^ J. X J 

This subroutine is entered at location EJECT (block AD01) from the Phase I 

Control Routine. The operand field is checked for a blank. If it is not a 

blankv the necessary ID-Code and error flags are placed in the Intermediate 

Text. Control then returns to location C311 in the Phase I Control Routine 

(Chart 04) . 

The format of the Intermediate Text is as follows: 



J. ^ ^ ^ ^ 

I BYTE II II 
I 1 I 2 I 3-22 I 23-24 | 

|. 1 1 1 ^ 

I ID-code I Internal code | Blank | Error flags | 

I I of instruction j II 

I I (EB) I I I 

L X X X J 



END Translation - Chart AD (Blocks 08-11) 

The END instruction terminates the assembly of a program. It may also 
indicate a point in the program to which control may be transferred after the 
program is loaded. 
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The source statement forir»at is as follows: 



J. J. ^ ^ 

I NAME I OPERAND j OPERATION j 

|. 1 1 ^ 

I Not used I END | A relocatable expression or a blank | 
|. X X ^ 

I Where: The relocatable expression specifies the point to which control j 
I may be transferred after the object program is loaded. j 

L : . J 



This subroutine is entered at location END (block ADOS) from the Phase I 
Control Routine. It translates the operand of the instruction into intermedi- 
ate text meaningful to Phase II of the Assembler Program and returns control to 
location C311 in the Phase I Control Routine (Chart 04) . 

The format of the Intermediate Text is as follows: 



J. .^ ^ ^ ^ ^ ^ .. 

I BYTE I I 1*1 I I 

I 1 I 2 I 3-4 I 5-16 I 17-22 | 23-24 | 
|. 1 1 1 1 1 ^ 

I ID-code I Internal | Blank | Translated | Blank | Error | 

j I code of j j operand j j flags j 

I I instruction | j j j j 

I I (EF) I I I I I 

j. wX ± X X X -| 

I * Blank if the operand field is blank. | 

L J 



The relocatable expression may have a maximum of three terms. Therefore ^ 
bytes 5-16 are divided into three 4-byte fields. The bit pattern for each 
translated term of the operand field placed into bytes 5-16 is as follows: 

Bit 12 3 4 5-8 9-16 17-24 25-32 
fP" I L I X I X I N I 



S-. 



"V 



Bytes 5^9,13 6^10,14 7,11,15 8,12,16 



Where: P = if the term is a self-defining value 
P = 1 if the term is a symbol 

L = if field N contains something other than a blank 
L = 1 if field N contains a blank 

XX = 00 if the arithmetic operator preceding N is + 
XX = 10 if the arithmetic operator preceding N is - 
XX = 11 if the arithmetic operator preceding N is * 
N = a self- defining value or the location of a symbol within 
the Symbol Table 



ENTRY Translation - Chart AD (Blocks 03-07) 

The ENTRY instruction identifies a symbol, defined elsewhere in the program, 
that may be used as an entry point to this program by other programs. 
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The source statement format is as follows: 

r T T " 1 

I NAME I OPERATION | OPERAND | 

|. + + ^ 

I Not used I ENTRY | A relocatable symbol | 

L JL X J 

This subroutine is entered at location ENTRY (block AD07) from the Phase I 
Control Routine. It translates the operand of the instruction into intermedi- 
ate text meaningful to Phase II of the Assembler Program and returns control to 
location C311 in the Phase I Control Routine (Chart 04) . 

The format of the Intermediate Text is as follows: 



j BYTE 



3-4 



5-8 



I 



I I I 

9-14 I 15-22 I 23-24 | 



I ID- code I Internal | Blank 
j I code of I 

I I instruction I 

I I (EA) I 



j Translated! Actual | Blank 

I operand j symbol | 

I I from I 

I I operand | 



Error 
flags 



The bit pattern of the translated relocatable symbol placed into bytes 5-8 
is as follows: 



Bit 1 


2 


3 


4 


5 - 


8 9 


— 


16 17 


— 


24 25 


- 


32 


P i 


^ 1 


X 1 


X 








N 








1 












y V 




V V 




y ^ 




J 


Byte 




5 




6 


7 




8 





Where: P = 1 since the operand is a symbol 

L = since field N will contain something other than a blank 
XX = 00 since the location of the symbol is always positive 
N = the location of a symbol within the Symbol Table 



EQU Translation - Chart AE (Blocks 01-08) 

The EQU instruction is used to assign to a symbol in the name field the same 
length and attributes as an expression in the operand field. 

The format of the source statement is as follows: 



^. ^ ^ . -, 

j NAIVIE I OPERATION | OPERAND | 

|. 1 + _ _ ^ 

I Required | EQU | An expression (any symbols in the | 

I j I expression must be previously defined) | 

L X .X J 

This subroutine is entered at location EQU (block AE01) from the Phase I 
Control Routine. It translates the operand of the instruction into intermedi- 
ate text meaningful to Phase II of the Assembler Program and returns control to 
location C311 in the Phase I Control Routine (Chart 04). 
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The format of the Intermediate Text is as follows: 



y. ^ -J. ^ ^ ^ ^ 

I BYTE I I I I I I 

I 1 I 2 I 3-4 I 5-16 I 17-22 | 23-24 | 
^ . 1 1 1 + 1 ^ 

I ID-code I Internal | Blank | Translated | Blank | Error | 

I I code of I I operand | j flags | 

I I instruction | | | | | 

I I (E5) I I I I I 

L X X X X X J 



The operand field may have a maximum of three terms. Therefore , bytes 5-16 
are divided into three 4-byte fields. The bit pattern for each translated term 
is as follows: 



Bit 


1 




2 




3 


4 


5 - 


- 8 


9 - 


16 




17 - 24 




25 


- 


32 






P 


1 


L 


1 


X 


1 X 1 










N 












: 














V 

9,13 




J 


Vv 


14 


'■ \ 




J 


V 






J 


Bytes 










5, 


6,10, 


7,11,15 


8, 


12, 


16 




Where 




P 


= 





if 


the 


term 


is a 


self-d 


efii 


lin 


ig value 













P = 1 if the term is a symbol 

L = if field N contains something other than a blank 
L = 1 if field N contains a blank 

XX = 00 if the arithmetic operator preceding N is + 
XX = 10 if the arithmetic operator preceding N 
XX = 11 if the arithmetic operator preceding N 
N = a self-defining value of the location of a 
the Symbol Table 



IS - 

is * 

symbol within 



EXTRN Translation - Chart AE (Blocks 09-14) 

The EXTRN instruction identifies a linkage symbol as an external symbol 
defined in some other program that will be referred to in this program. 

The source statement format is as follows: 



r ■ T T 1 

I NAME I OPERATION j OPERAND j 

|. 1 , 1 ^ 

I Not used I EXTRN | A relocatable symbol | 

L X X . J 



This subroutine is entered at location EXTRN (block AE09) from the Phase I 
Control Routine. It translates the operand of the instruction into intermedi- 
ate text meaningful to Phase II of the Assembler Program and returns control to 
location C311 in the Phase I Control Routine (Chart 04) . 
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The format of the Intermediate Text is as follows: 



r T T T T T T 1 

I BYTE I I i I I I I 

I 1 I 2 I 3-4 I 5-8 I 9-14 | 15-22 | 23-24 | 
|. + 1 1 ^ 1 1 1 ^ 

I ID-code I Internal | Blank | Translated) Actual | Blank | Error | 

I I code of I I operand | symbol | j flags | 

I I instruction I | | from | | | 

I I (E9) I I I operand | | | 

L X X X X X X J 

The bit pattern of the translated relocatable symbol placed into bytes 5-8 
is as follows: 



Bit 



Byte 



L I X I X I 



5-8 



9-16 



17 - 24 



25 - 32 



8 



Where: P = 1 since the operand is a symbol 

L = since field N contains something other than a blank 
XX = 00 since the location of the symbol is always positive 
N = the location of a symbol within the Symbol Table 



ICTL Translation - Chart AF (Blocks 01-07) 

The ICTL instruction tells the Assembler Program in which column the 
statement portion of the source program statement begins. 

The format of the source statement is as follows: 



J. ^ ; ^ . ^ 

I NAME I OPERATION | OPERAND | 

|. 1 1 ^ 

I Not used I ICTL I The decimal value 1 or 25 | 

L X X J 

This subroutine is entered at location ICTL (block AF01) from the Phase I 
Control Routine. When the ICTL instruction is used, it must be the first 
statement in the source program. This subroutine translates the operand into 
intermediate text which will be reproduced in the object program listing. If 
the operand field is incorrect. Phase I will set the starting column to a 1 for 
a tape system and to a 25 for a card system. Control returns to location C311 
in the Phase I Control Routine (Chart 04) . 

The format of the Intermediate Text is as follows: 



J. ^ ^ ^ ^ ^ 

I BYTE I I III 
I 1 I 2 I 3-4 I 5-22 I 23-24 | 
|. 1 + 1„ 1 ^ 

I ID-code I Internal code | Translated | Blank | Error flags | 
I I of instruction j operand | | | 

I I (ED) I I I I 

L X X X X J 
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ORG Translation - Chart AG (Blocks 01-07) 

The ORG instruction is used to set the location counter to a specified 
address. 

The format of the source statement is as follows: 



J. ^ ^ ^ 

I NAME I OPERATION j OPERAND | 

|. 1 ^+ ._^„ ^ 

I Not used I ORG I A relocatable expression (any symbols in | 

I I I the expression must be previously defined) | 

L X X . J 



This subroutine is entered at location ORG (block AG01) from the Phase I 
Control Routine. It translates the operand of the instruction into intermedi- 
ate text meaningful to Phase II of the Assembler Program and returns control to 
location C311 in the Phase I Control Routine (Chart 04). 

The format of the Intermediate Text is as follows: 



J. ^ -^ ^ ^ ^ 

I BYTE I I I I I 

I 1 I 2 I 3-4 I 5-16 I 17-22 | 23-24 

^ 1 1 : 1 1 + 

I ID-code I Internal | Blank | Translated | Blank 

I I code of I I operand j 

I I instruction | | | 

I I (E8) I I I 



The relocatable expression may have a maximum of three terms. Therefore, 
bytes 5-16 are divided into three 4-byte fields. The bit pattern for each 
translated term is as follows: 



Bit 1 2 3 4 5-8 9-16 17-24 25-32 



1 Error | 


1 flags 1 
1 1 
1 1 



Bytes 5,9,13 6,10,14 7,11,15 8,12,16 

^ 



Where: P = if the term is a self -defining value 
P = 1 if the term is a symbol 

L = if f ield N contains something other than a blank 
L = 1 if field N contains a blank 

XX = 00 if the arithmetic operator preceding N is + 
XX = 10 if the arithmetic operator preceding N is - 
XX = 11 if the arithmetic operator preceding N is * 
N = a self-defining value or the location of a symbol within 
the Symbol Table 



L — 



SPACE Translation - Chart AG (Blocks 08-12) 

The SPACE instruction is used to insert one or more blank lines in the 
object program listing. 
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The source statement format is as follows: 



J. ^ ^ ^ 

I NAME I OPERATION j OPERAND | 

^ 1 1 « . ^ 

I Not used I SPACE I A decimal value not greater than 63 | 

L X i. J 

This subroutine is entered at location SPACE (block AG08) from the Phase I 
Control Routine. It translates the operand of the instruction into intermedi- 
ate text meaningful to Phase II of the Assembler Program. If the operand field 
is blank, the Assembler assumes a value of 1 . If the operand field is greater 
than 63, the SPACE instruction is treated the same as the EJECT instruction by 
Phase II of the Assembler Program. Control returns to location C311 in the 
Phase I Control Routine (Chart 04) . 

The format of the Intermediate Text is as follows: 



J. ^ ^ ^ ^ ^ 

I BYTE I I II I 

I 1 I 2 I 3-4 I 5-22 I 23-24 | 

^ + 1 1 1 _ ^ 

I ID-code I Internal code | Translated | Blank j Error flags | 

I I of instruction | operand | | | 

I I (E7) 1 III 

L J. X : X X J 



ST?KRT Translation - Chart AF (Blocks 08-16) 

The START instruction may be used to indicate the beginning of an assembly, 
to give a name to the object program, and to set the location counter to an 
initial value. 

The format of the source statement is as follows: 



J. ^ ^ . ^ 

I NAME I OPERATION j OPERAND j 

|. 1 1 ^ 

I Optional | START | A self-defining value or blank | 

L X X J 

This subroutine is entered at location START (block AF08) from the Phase I 
Control Routine. It translates the operand of the instruction into intermedi- 
ate text meaningful to Phase II of the Assembler Program. If the operand field 
contains an error, the location counter will be set to zero. Control returns 
to location C311 in the Phase I Control Routine (Chart 04) . 

The format of the Intermediate Text is as follows: 



r T 

BYTE I 

1 I 
f +" 

ID-code I Internal 
I code of 
I instruction 
I (EE) 



y ^ 

I I 
15-22 I 23-24 | 

Blank I Error | 
I flags I 



I 






3 
Blank 



Boundary 

alignment 

pattern 



5-8 



Trans- 
lated 
operand 



9-14 



Actual 

symbol 

from 

name 

field 
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The translated operand placed into bytes 5-8 will be 
address of the first byte of the object program. 



the assembled 24-bit 



USING Translation - Chart AH (Blocks 01-07) 

The USING instruction indicates that the general register specified is 
available for use as a register for base addressing* This instruction also 
states the base-address value that the Assembler may assume will be in the 
indicated general register at object time. 

The source statement format is as follows: 



I NAME 



i OPERATION 



|. 1 +- 



I OPERAND 



Not used 



USING 



I 



I- 



Where : 



A relocatable expression and a simple 
I I expression separated by a comma 

X JL 

The relocatable expression specifies a value that the Assembler 
can use as a base register. 



The simple absolute expression specifies the general register 
that can be assumed to contain the base address represented by 
the relocatable expression. 



L : 



J 



This subroutine is entered at location USING (block AH01) from the Phase I 
Control Routine. It translates the operand of the instruction into intermedi- 
ate text meaningful to Phase II of the Assembler Program and returns control to 
location C311 in the Phase I Control Routine (Chart 04) . 

The format of the Intermediate Text is as follows: 



I 



i BYTE 



3-4 



f 

I ID-code 

I 



I 



I 5-16 I 17-20 I 21-22 | 23-24 | 



I Internal | Blank | Translated] Translated] 

I code of I I relocat- ( simple | 

I instruction! | able | expression! 

I (E6) I I expression I | 

-i. J. JL . J. . i- 



Blank 



I Error 
I flags 



The bit patterns for the translated expression of the operand field placed 
into the intermediate text are as follows: 

Relocatable Expression : 

The relocatable expression may have a maximum of three terms. Therefore, 
bytes 5-16 are divided into three 4-byte fields. The bit pattern for each 
translated term is as follows: 
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Bit 1 


2 


3 4 


5 - 


-8 9 - 16 17 - 24 25 - 32 


|P 1 


L 


X 1 X 1 




N 1 


^ 








J ^ y \. y^ J 


Bytes 




5,97l3 


6,10,14 7,11,15 8,12,16 



Where: P = if the term is a self-defining value 
P = 1 if the term is a symbol 

L = if field N contains something other than a blank 
L = 1 if field N contains a blank. 

XX = 00 if the arithmetic operator preceding N is + 
XX = 10 if the arithmetic operator preceding N is - 
XX = 11 if the arithmetic operator preceding N is * 
N = a self-defining value or the location of a symbol within 
the Symbol Table 



Simple Expression ; 



r 

I Bit 



j .Bytes 



P I L I 



ITT 



- 8 



9-16 17 - 24 



25 - 32 



17 



^v> 



—\r~ 
18 



19 



_y ^ 



] i 



20 



H 



I Where: P, L, and N have the same meanings as in the relocatable expression | 
I XX = 00 since the expression will always be positive | 

L J 



MACHINE INSTRUCTION STATEMENTS 



RR Format Translation - Chart AH (Blocks 08-17) 



Instructions in the RR format are used for register-to-register operations 
except for SVC (the operand specifies immediate data) and SPM (the operand 
specifies one general register) 

The source statement formats are as follows: 



J. ^ ^ ^ 

I NAME I OPERATION | OPERAND | 

|. 1 + ^ 

I Optional | All RR instruc- | R1, R2 | 

I I tions except SVC | | 

I I and SPM I I 

|. 1 1 ^„^ 

I Optional | SVC j I | 

^ 1 1 ^ 

I Optional j SPM j R1 j 

L X i : J 

This subroutine is entered at location MACHB (block AH09) from the Phase I 
Control Routine, except for the SVC instruction which enters at location MACHI 
(block AH13) and the SPM instruction which enters at location MACHJ (block 
AH01) . This subroutine translates the operand of the instruction into 
intermediate text meaningful to Phase II of the Assembler Program and returns 
control to location C311 in the Phase I Control Routine (Chart 04) . 
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The format of the Intermediate Text is as follows: 



BYTE 



I 



* 

3-4 



5-6 



T- 



7-20 



21-24 



|. 1 ^ + 1 1 ^ 



ID-code \ Internal | Translated | Translated | 

I code of I R2 or I | R1 field | 

I instruction | field | | 

JL - -; X- 



Blank 



Error 
flags 

-i 



[. X X - -; X X X 

* Blank if no R2 field. Byte 3 contains the number of zeros to be 
assembled by Phase 2 if an error is encountered, 
** Blank if SVC instruction. 

L J 

The bit pattern for the translated R1 fields R2 fields or I field is as 
follows : 




Where: P = if the field is a self-defining value 
P = 1 if the field is a symbol 

L = if field N contains something other than a blank 
L = 1 if field N contains a blank 

N = a self-defining value or the location of a symbol within 
the Symbol Table 



RS Format Translation - Chart AI 

Instructions in the RS Format are used for register-to- storage operations 
and for shift operations. 

The source statement formats are as follows: 

Format type 1 

r T T 1 

I NAME I OPERATION j OPERAND j 

|. 1 + i| 

I Optional j All instructions | R1, R3, D2 (B2) j 

I I except shift j | 

I I instructions j j 

L X X J 

Format type 2 

^ J. ^ ^ 

I NAME I OPERATION | OPERAND | 

|. + +> _ ^ 

I Optional j All shift | R^ , D2 (32) | 

j I instructions j j 

L X X - J 

This subroutine is entered at location MACHC (block AI01) from the Phase I 
Control Routine r except for format type 2 which enters at location ixiACHD (block 
AI02) . This subroutine translates the operand of the instruction into 
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intermediate text meaningful to Phase II of the Assembler Program and returns 
control to location C311 in the Phase I Control Routine (Chart 04) . 

The format of the Intermediate Text is as follows: 



BYTE I I * II I ** I I 

1 I 2 I 3-4 I 5-6 I 7-12 | 13-14 | 15-20 | 21-24 
|. ^1 + 1 1 1 1 ^ ^ 

ID-code I Internal | Transr | Trans- | Trans- | Trans- | Blank | Error 
I code of I lated j lated | lated j lated | | flags 
I instruction! R3 field j R1 field | D2 field | B2 field | j 

|. X X X . X X X X 

* Blank if not specified or if format type 2 is being translated. 
Byte 3 contains the number of bytes to be assembled as zeros if an 
error is encountered. 
** Blank if not specified. 



The bit patterns for the translated fields of the operand placed into the 
Intermediate Text are as follows: 



R3 field, R1 fields or B2 field; 

r 

Bit 1 2 3-8 9-16 



Bytes 3^5,13 ^#6,14 
^ . ^ 

Where: P = if the field is a self-defining value 
P = 1 if the field is a symbol 

L = if field N contains something other than a blank 
L = 1 if field N contains a blank 

N = a self-defining value or the location of a symbol within 
the Symbol Table 



D2 field: 

The D2 field may have a maximum of three terms. Therefore, bytes 7-12 are 
divided into three 2-byte fields. The bit pattern for each translated term is 
as follows : 



Bit 1 2 3 4 5 - 8 9-16 

rp~r L I X I X I 



y^ 



Bytes 7,9,11 8,10,12 
|. „« ^ 

Where: P, L, and N have the same meanings as indicated for the R3, R1, 
and B2 fields 

XX = 00 if the arithmetic operator preceding N is + 

XX = 10 if the arithmetic operator preceding N is - 

XX = 11 if the arithmetic operator preceding N is * 
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RX Format Translation - Chart A J 



Instructions in the RX Format are used for register-to-indexed-storage 
operations. 



The source statement format is as follows : 



J. ^ ^ . ^ 

I NAME I OPERATION j OPERAND | 

|. + 1 ^ 

I Optional | Any RX | R1,D2(B2,X2) j 

I j instruction j | 

L X _. JL : J 



This subroutine is entered at location MACHA (block AJ01) from the Phase I 
Control Routine. It translates the operand of the instruction into intermedi- 
ate text meaningful to Phase II of the Assembler Program and returns control to 
location C311 in the Phase I Control Routine (Chart 04) . 

The format of the Intermediate Text is as follows: 



T 

BYTE 1 

1 1 2 


T 

1 
1 

± 


T- 

* 1 

3-4 t 

X 


T- 

1 

5-6 1 


1 * 1 
7-12 1 13-14 1 

X X - 


1 

15-20 1 

X 


21-24 


ID-code I Internal j 
I code of 1 
I instruction! 

X X 


t 

Trans- | 

lated 1 

X2 fieldl 

X 


t 

Trans- | 

lated 1 

R1 fieldl 

J- 


t t 

Trans- | * Trans- | 

lated 1 lated j 

D2 fieldl B2 field| 


t 
Blank j 

1 
1 

X 


Error 
flags 


* Blank if not specified. Byte 3 contains the number of bytes to be 
assembled as zeros if an error is encountered. 



The bit patterns for the translated fields of the operand placed into the 
Intermediate Text are as follows: 



X2 fields R1 fields or B2 field; 



Bit 



Bytes 

I- 

Where: 



1 



N 



3,5,13 



16 



"i^TeTi^ 



P = if the field is a self-defining value 
P = 1 if the field is a symbol 

L = if field N contains something other than a blank 
L = 1 if field N contains a blank 

N = a self- defining value or the location of a symbol within 
the Symbol Table 



D2 field : 

The D2 field may have a maximum of three terms. Therefore, bytes 7-12 are 
divided into three 2-byte fields. The bit pattern for each translated term is 
as follows: 
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Where: P^ L, and N have the same meanings as indicated for the 
X2, R1r and b2 fields 
XX = 00 if the arithmetic operator preceding N is + 
XX = 10 if the arithmetic operator preceding N is - 
XX = 11 if the arithmetic operator preceding N is * 



SI Format Translation - Chart AK 



Instructions in the SI Format are used for storage and immediate data 
operations. 

The source statement formats are as follows: 

Format type 1 

r T T 1 

I NAME I OPERATION j OPERAND | 

^ 1 « + ^ 

I Optional j All SI instruc- | D1(B1),I2 | 

I I tions except j j 

I I those in format j j 

I I type 2 I I 

L X X . J 

Format type 2 

^ . ^ ^ ^ 

I NAME I OPERATION | OPERAND i 

|. + 1 ^ 

I Optional j LPSW,SSM,HIO, j D1 (B1) | 

I I SIO,TIO,TCH,TS I I 

L X X . J 

This subroutine is entered at location MACHE (block AK01) from the Phase I 
Control Routine r except for format type 2 which enters at location MACHF (block 
AK02) . It translates the operand of the instruction into intermediate text 
meaningful to Phase II of the Assembler Program and returns control to location 
C311 in the Phase I Control Routine (Chart 04) . 

The formats of the Intermediate Text are as follows: 



Format type 1 





"T T T T T — 




y- 




BYTE 


1 1*1 1 ** 1 




1 




1 


1 2 1 3-6 1 7-12 1 13-ia 1 
^1 1 1 1 1.- 


15-20 


1 
-1- 


21-2U 


ID-code 


1 Internal | Translated | Translated | Translated | 
! code of 1 I field | Dl field | B1 field | 
1 instruction! | | | 

-X X X X X 


Blank 


1 
1 
1 

. X- 


Error 
flags 


* Byte 


3 contains the number of bytes to be assembled as zeros 


if 


an 


error 


is encountered. 








** Blank 


if not specified. 
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Format type 2 

^ . ^ 

I The format is the same as type ^, except that bytes 3-6 are blank. | 

L : . J 



The bit patterns for the translated fields of the operand placed into the 
Intermediate Text are as follows: 

I field or B1 field: 



r- 



Bytes 3,13 4,14 5 6 



Bit 12 3-8 9-16 17-24 25-32 



— 1 



^ V. 



"V N^~ 



Where: P = if the field is a self-defining value 
P = 1 if the field is a symbol 

L = if field N contains something other than a blank 
L = 1 if field N contains a blank 

N = a self-defining value or the location of a symbol within 
the Symbol Table 



D1 field : 

The D1 field may have a maximum of three terms. Therefore, bytes 7-12 are 
divided into three 2-byte fields. The bit pattern for each translated term is 
as follows : 



Where: P, L, and N have the same meanings as indicated for the 
12 and B1 fields 
XX = 00 if the arithmetic operator preceding N is + 
XX = 10 if the arithmetic operator preceding N is - 
XX = 11 if the arithmetic operator preceding N is * 



SS Format Translation - Chart AL 

Instructions in the SS Format are used for storage-to-storage operations. 
The source statement formats are as follows: 

Format type 1 

J. ^ ^ ^ 

I NAME I OPERATION | OPERAND j 

(. + 1 _ — ^ 

I Optional j PACK, UNPK, j D1(L1,B1), D2 {L2,B2) | 

I I MYO, AP, CP, I I 

I j DP, MP, SP, ZAP I I 

L . X ' X . J 
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Format type 2 

J. ^ y ^ 

I NAME I OPERATION | OPERAND j 

|>_ 1 1«^ ^ 

I _ Optional | All other SS j D1 (L,B1) , D2 (B2) j 

I j instructions j j 

L J. X J 



This subroutine is entered at location MACHG (block AL01) from the Phase I 
Control Routine, except for format type 2 which enters at location MACHH (block 
AL02) • It translates the operand of the instruction into intermediate text 
meaningful to Phase II of the Assembler Program and returns control to location 
C311 in the Phase I Control Routine (Chart 04) . 



The formats of the Intermediate Text are as follows: 



Format type 1 

r T T . T T T T T T 

I BYTE I 1*1*1 1*1*1*1 

1 I 2 I 3-4 I 5-6 I 7-12 | 13-14 | 15-20 | 21-22 | 23-24 



.| 1 1 1 _„| 1 1 1 ^ 

ID- I Internal I Trans- | Trans- | Trans- | Trans- | Trans- | Trans- | Error 
code I code of j lated j lated j lated j lated | lated j lated j flags 
|instruc-| L2 | LI | D1 | B1 | D2 | B2 | 
I tion I field | field | field | field | field | field | 

|. X X X X X X-.. X X -^ 

* Blank if not specified. Byte 3 contains the number of bytes to 
be assembled as zeros if an error is encountered. 



Format type 2 



The format is the same as type A, except that bytes 3-4 contain the 
translated L field and bytes 5-6 are blank. 



The bit patterns for the translated fields of the operand placed into the 
Intermediate Text are as follows: 



L or L2 field, L1 field, Bl field, or B2 field : 

r 



Bit 



1 2 

IP I L 



3-8 



9-16 



N 



Bytes 

F 

Where: 



3,5,13,21 



_^ ^ 



4,6,14,22 



P = if the field is a self-defining value 
P = 1 if the field is a symbol 

L = if field N contains something other than a blank 
L = 1 if field N contains a blank 

N = a self-defining value or the location of a symbol within 
the Symbol Table 



D1 field or D2 field : 

The D1 field and the D2 field may contain a maximum of three terms. 
Therefore, bytes 7-12 and 15-20 are divided into three 2-byte fields. The bit 
pattern for each translated term is as follows: 
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^ Bit 12345-8 9-16 

[ZIE ^ I X I X I N I 

V ^ / V ^ . 

Bytes 7,9,11,15,17,19 8,10,12,16,18,20 

^ ^ ^ 

Where: P, L, and N have the same meanings as indicated for the 
L, L1, L2, B1, and fi2 fields 
XX =00 if the arithmetic operator preceding N is + 
XX = 10 if the arithmetic operator preceding N is - 
XX = 11 if the arithmetic operator preceding N is * 
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» START PHASE 
* 



»INOVT 



-*-»-«—»— 



«READ IN PHASE I« 



X 02 

» * 

* ESTABLISH * 
» * 

♦ADDRESSABILITY * 
« » 

****** it********** 



*****03********** 
♦DETERMINE MAIN * 

* STORAGE SIZE * 

* AND GENERATE » 

* CONTROL * 
» PARAMETERS * 



*****^3* ********* 

* CLEAR SYMBOL * 

* TABLE AREA * 
» AND * 

* RESERVE FIRST » 

* TWO ENTRIES * 



*****P2* ********* 

* * 

* GET INPUT AND * 

* OUTPUT »X 
» ADDRESSES AND » 

* STORE * 
***************** 



* INTERMEDIATE 

* TEXT 

* TO 24 BYTES 
*************** 



*****Q4* ********* 

* * 

* SET » 
X* MOVE DATA * 

* SWITCH » 

* * 
***************** 



*****^3* ********* 

* * 

* SET * 
» MOVE DATA » 

* SWITCH * 
« * 
***************** 



* INTERMEDIATE * 

* TEXT * 

* TO 104 BYTES * 
*********^******* 



* READ *X 

* NEXT SOURCE * 

* STATEMENT » 



«»«««J4.«««»««««»« 

* » 
♦STORE TAPE UNIT* 

.* OUTPUT * 

* ADDRESS * 
« * 
***************** 



*-*-*-*—*-*-*-*-* 

,* READ *X 

« SYMBOL TABLE * 

* DECK « 



***** 
*04 * 
* Bl« 



Chart 03. Phase I Initializa-tion 



Phase I 



51 



»04 * 

« B5* 



« B5 *.X. 



* READ « 
» SOURCE » 

* STATEMENT * 



X 02 

*****Z I** ******** 

* SET COLUMN TO * 
*START SCAN. SET* 
« NECESSARY » 
♦SWITCHES. BLANK* 

* PUNCH BUFFER * 
***************** 



»»««*£ !»*******»* 

* STORE ERROR * 

* FLAG Z * 

* IN * 

* INTERMEDIATE * 

* TEXT * 



STARTING *. YES 
COLUMN •«.... 

. BLANK .* 



*. COMMENTS 



X 07 
«««'9('«H1 ********** 

* STORE * 
« ID-CODE 'C * 

* INTO * 

* INTERMEDIATE « 

* TEXT « 



***** 
*05 » 
* F2* 



.X*SCAN NAME FIELD*. 

* * 

»C=40 * 

***************** 

.CORRECT 



X 09 
«««««H2** ******** 
* SAVE SYMBOL * 
*FROM NAME FIELD* 
.* AND SET VALID * 
*NAME INDICATOR « 
» » 



«««««J2********« 

* STORE ERROR 

* FLAG (L) 

* IN 

* INTERMEDIATE 
« TEXT 



11 

*«*»»B 3 ********** 
*EVE AMB3* 

»-*-»-*-*-*-»-*-» NONE 

X* SCAN FOR * 

*OPERATION CODE * 
*C=40 * 

***************** 
.FOUND 



X 12 
»««»«^C3* ********* 
*EVE AMB3*N0T IN 

»-*-*-»-*-*-*-*-« TABLE 

*SCAN OPERATION * 

CODE TABLE * 



NO 


.* 


STATEMENT 


. . .* 




TO BE 


, 


* 


•ASSEMBLED. 






*. .* 


X 




* • •* 


»«»»« 




* YES 


*05 » 






* F2* 




, 


» * 




X 


* 




*05 * 



*C=40 

•FOUND IN 
.TABLE 



X 13 
«»«»«03** ******** 

* STORE OP CODE * 
*IN INTERMEDIATE* 
» TEXT * 

* SET BRANCH TO * 
*TRANS. OPERAND « 
**i(« «««*«« «»*«»«« 



MACHINE 
OPERATION 
. CODE 



»**»«C4********** 
*ERR * 

X* STORE ERROR * 
» FLAGS (NO) IN * 
*BYTES 23 AND 24* 



15 



18 
«*««»E4********** 

* SET ID-CODE A * 

* INTO BYTE 1 * 
X* SET NAME * 

* ALLOWED * 

* INDICATOR * 
***************** 
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»»»»F3* ********* ««**»F4********» 

* *EVE AMB3* 
SET * «_*_»_»_*_»_»_*_« 

ID-CODE 8 * *ALIGN LOC. CTR.* 

INTO BYTE 1 * * TO HALF-WORD * 

* * BOUNDARY * 
»»♦♦»«»»«****»»* *«««««««««»«««-««« 

Ix I 

* TRANSFER TO SUBROUTINE TO * 

* TRANSLATE OPERAND FIELD * 

* OPERATION . LOCATION . CHART * 

• *............ •...••.•.. ••••....* 

« CCW . CCW . AAB2 » 

. *...... .•••......•.••. .•••.••..* 

» CNOP . CNOP . ACBl * 
. *.. ...••••.••.....•••. ...•.....* 

» DC .DC . ABB2 * 

. *..... •..••■....••. •••..•••••..* 

. » DROP . DROP . ADG4 * 

. *....... •••..••. ........••....•* 

* DS . DS . ACA4 * 

• *.......... •••..•••. ...••••....* 

* EJECT . EJECT . ADBl * 

• *............. ......... ........* 

* end • end . a0b4 * 
', * 'entry I*entry*"*I'adfi*** 

• **«••.••*••.•.■..••«•••••«•«••«* **** 
» EQU . EQU . AECl * » * 

X* *....X* 65 * 

« EXTRN . EXTRN . AEC4 * « * 
* ••..•....*..•.......••••....•• * **** 

* ICTL . ICTL . AFBl * 
*...... ................... .....* 

* ORG . ORG . AGCl * 
*...... ................... .....* 

* SPACE . SPACE . AGC4 * 
*............. ••....... ........* 

* START . START . AFB4 « 
*.................. ....... .....* 

* USING . USING . AHBl * 
*............. .................* 

* RR . MACHB . AHB4 « 
*... .•••••..•...... ......•.....* 

* RR(SVC) . MACHI . AHF4 * 
*....... .................. .....* 

* RR(SPM) . MACHJ . AHB3 * 
*... ...................... .....* 

* RSI . MACHC . AIA2 * 
*..............................* 

* RS2 . MACHD . AIB2 » 
*...... .............. ..........* 

* RX • MACHA . AJB2 * 
*..........•............•......* 

* SIl . MACHE . AKB3 « 
*...... ••.••...•...•.. .........* 

* SI2 . MACHF . AKB2 * 
*...... ............. ...........* 

* SSI . MACHG . ALAl * 
*•«•... ••....•.••...•..•■. •...•* 

* SS2 . MACHH • ALBl * 



Chart 04. Phase I Control Routine 
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NAME ERROR 



B2 *. 
.« NAME ». 
^ALLOWED AND* 

VALID NAME 

♦INDICATORS * 

«. SET .* 



* YES 


* CNE 

.X. 
C2 *. 02 
• * *• 
NO .*VALID NAME *. 

*. INDICATOR .« 

*. SET .* 

«. .» 

*• • * 

* YES 

X 03 
*****02.** ******** 
* STORE ERROR « 






* FLAG (L) » 


YES 




* IN « 






* INTERMEDIATE * 






* TEXT * 






. 






••••••••••••X*X«*«*««*»*« 











Ot. 
**»**B3* ********* 
♦STORE LOCATION « 

* COUNTER IN » 
.X*VALUE ATTRIBUTE* 

« OF NAME IN * 

* SYMBOL TABLE * 



-*—*—*—*—*— 



t* ******** ******* 



.* ERROR *. 
» IN TLUN 
PROCESSING 



* J OR K IN « 

* BYTE 1 * 

* ACCORDING TO * 
♦OPERATION CODE * 



.X*. 1442 SYSTEM 



.♦OUTPUT *. 

RECORD 

IN OUTPUT 

AREA 



♦ DOES *. N 
INPUT EQUAL .♦. 
». OUTPUT .* 



**»*»F4^^^^^*^^^* 

* MOVE * 

* INTERMEDIATE ♦ 

* TEXT * 



.X*IS INPUT BLANK 



«*K 1******* 
IPL PHASE II 
♦AND TRANSFER 
* CONTROL TO 
* PHASE I I 



**** 

* * 

* J2 ♦ 

* » 
**** 



*—*—*—*—*— *—*—*—* 

♦ PRINT ♦ 

♦ END PHASE I ♦ 

♦ MESSAGE ♦ 
***************** 



****K2.** ******* 

* WAIT FOR ♦ 

* PHASE II * 

* TO BE LOADED * 



X 21 

*»*»*H3***^^^^^^^ 

♦ BLANK ♦ 

♦ PUNCH BUFFER ♦ 

♦ AND STORE 9 ♦ 
♦PUNCH IN PUNCH ♦ 

♦ BUFFER COL 1 ♦ 
***************** 



««««K3**^^***^ 
« 

* HALT 
* 

************** 



* WRITE ♦ 

* INTERMEDIATE * 

* TEXT * 



.X*. TAPE SYSTEM 



PUNCH * 

SYMBOL TABLE ♦ 

DECK * 

**************** 



****H5*** ******* 

RELOCATE ♦ 

SYMBOL TABLE ♦ 

TO ♦ 

UPPER MAIN * 

STORAGE ♦ 

**************** 



*—*—*—*—*—*—*—*—* 

* INCREMENT ♦ 

* LOCATION ♦ 

* COUNTER ♦ 
***************** 



***** 

♦ 04 ♦ 

♦ Bl* 



»»*» 




* Y 


» 




« 


Kl * 










X 


**** 


* 


*»*» 




* 


J2 



Chart 05. Phase I Control Routine (continued) 
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*AA * 
* B2* 



» B4 « 
» « 



CCV» X 01 

*EAR » 

♦ALIGN LOC. CTR.« 
*TC DOUBLE-WORD « 
* BOUNDARY * 



X 02 
«««««C2********** 
»EVE AMB3» 

*-«—«—*—»—«—*—«-# ERR 
♦TRANSLATE FIRST*.,.. 
» TERM * 
»PC-01 C=00 T=01« 

•CORRECT 



X 03 
«««««02* **♦***♦«* 
♦STORE ♦ 

♦ STORE INTO ♦ 

♦ INTERMEDIATE ♦ 

♦ TEXT ♦ 



E2 



♦ . 04 



.♦ 

» NEXT ♦. NO 

CHARACTER A .♦... 
K. COMMA .♦ 
♦. .* 
♦ • • ♦ 
♦ YES 



X 05 
«««««F2^ ♦♦♦♦♦♦♦♦♦ 
♦EVE AMB3^ 

«-«-«-«>*-.«-«.«-* ERR 

♦ TRANSLATE ♦....X 

♦ SECOND TERM ♦ 
♦PC=03 C=BO T=02^ 

•CORRECT 



X 06 
«««»»G2 ♦♦♦♦♦♦♦♦♦♦ 
♦STORE ♦ 

« — «->«—«—« — «—»—«-« 

♦ STORE INTO ♦ 

♦ INTERMEDIATE ♦ 

♦ TEXT ♦ 



.♦ NEXT ♦. NO 
♦. CHARACTER A .♦... 
♦. COMMA •♦ 



X 08 
«««»«B4* ♦♦♦♦♦♦♦♦♦ 
♦EVE AMB3^ 

ERR«.«-.»~»-« -«»«-«-* 
....♦TRANSLATE THIRDS 
♦ TERM ♦ 
♦PC=21 C=00 T=01^ 

•CORRECT 



X 09 
«»«««C4*^^^^^^^^^ 
♦STORE ♦ 

»—«-.«—*—«—»—♦—*—« 

♦ STORE INTO ♦ 

♦ INTERMEDIATE ♦ 

♦ TEXT ♦ 



14 
«««««E 3 ♦♦♦♦♦♦♦♦♦♦ 
♦STORE NUMBER OF^ 

♦ BYTES TO ZERO ♦ 
.X^ AND ID-CODE M ♦X. 

♦IN INTERMEDIATE^ 

♦ TEXT ♦ 



X 15 
«»«»«F3^*^^^^^^^^ 

♦ ERR ♦ 

♦ STORE ERROR ♦ 

♦ FLAG IN ♦ 

♦ BYTE 24 ♦ 



NO .♦ NEXT ♦ 
. ..♦. CHARACTER A 
♦. COMMA .♦ 



X 11 
»««««E4^ ♦♦♦♦♦♦♦♦♦ 
♦EVE AMB3^ 

ERR»-.»-»-»-»-»-*-*-» 
. ...♦ TRANSLATE ♦ 
♦ FOURTH TERM ♦ 
♦PC=17 C=00 T=01* 

•CORRECT 



X 12 

♦STORE ♦ 

♦ STORE INTO ♦ 

♦ INTERMEDIATE ♦ 

♦ TEXT ♦ 



G4 ♦.I 

NO .♦* NEXT *♦ 
•..♦. CHARACTER A 
♦. BLANK •♦ 
♦ • .♦ 

♦• .♦ 
♦ YES 

X. 

X 

♦04 ♦ 

♦ B5^ 

» * 



X 



Chart AA. CCW Translation 



sa 



*Aa * 

* B2* 



B4 



1 1 



.* IS THERE »• 

.A DUPLICATION. 

«. FACTOR •* 



.* IS *. NO 
CODE TYPE .»•.. 
*. A •* 

*.. .* 
*• .* 
* YES 



X 02 
**«*»C2 ********** 
*CCF * 

#-*-*-»-»-*-*-*-« ERR 
» TRANSLATE *•... 

* AND * 

* STORE * 

.CORRECT 



D2 



03 



IS *. NO 
CODE TYPE .*... 
. CORRECT .* 
*• .* 
*. .* 
* YES 



NO .* IS *. 
...*. CODE TYPE . 
«. A .* 



.* IS THERE *. YES 
*.A DUPLICATION.*.... 
*. FACTOR .* 



X 06 
»«*»*G2** ******** 

* STORE * 

* INTERNAL CODE * 

* FOR TYPE A IN * 

* INTERMEDIATE * 



»*** 






* TEXT * 


* « 








* E4 * 








* * 








***» 








X 








. 






X. 


. YES 








.». 






X 07 


HI *. 


OR 




»««»»H2* ********* 


.* *. 






* STORE * 


.* NEXT 


*. 




* BOUNDARY * 


• CHARACTER A 


, 


*X.... 


....*ALIGNMENT BITS * 


*. BLANK 


* 




* ACCORDING TO * 


*. .* 






* TYPE CODE * 


*. .* 






***************** 



.* IS *. 

. CODE TYPE . 
*H, Et OR D * 



10 
««*»*J2 ********** 
*DCF * 

•» — * — «—* — »—*-«-«-.» ERR 
.X* TRANSLATE *.... 

* LENGTH * 

* CODE * 
***************** 

•CORRECT 



X 13 
*****C^** ******** 
*EVE AMB3* 

ERR* _*_«—*_♦_#_*_*_* 

. ...* TRANSLATE * 

* CONSTANT * 

*PC=07 C=BO T=02* 

***************** 

•CORRECT 



D4 *. 
,» * 
NO .» NEXT 
...*. CHARACTER 
*• BLANK 
*. .* 



X 15 
*****E.i^* ********* 

* MULTIPLY * 

* DUPLICATION * 

* FACTOR BY *X 

* LENGTH CODE * 

* AND STORE * 
***************** 



**************** 

* * 

* LINK TO * 

* SUBROUTINE * 

* ACCORDING « 

* TO TYPE CODE * 

* * 

* C . DCC * 



*• 


D 




DCD 


* 

*. 


E 




DCE 


* 
*• 


F 




DCF 


ERR* 


H 




DCH 



* X . OCX * 



* * 

» F3 * 

» * 

**** 



X 18 

*»*»*F3********** • F4 *. 16 

*ERR * 

*-*-*-*-*-*-*-*-* X YES .* RESULT *. 

•X* STORE ERROR *X *. GREATER THAN .* 

* FLAGS IN * *. * 65535 .* 

*BYTES 23 AND 24* *. .* 

***************** *, ,* 



NO 



»***»G4********** 

* * 
*SET PARAMETERS * 

* FOR BUMP * 

* SUBROUTINE * 

* * 
***************** 



X 

»04 * 
* B5* 



X 



X 



* B4 * 

* * 
**** 



Chart AB. DC Translation 
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*AC * 
* A4* 



»AC » 

* Bl* 



.* IS THERE ». 
.«.A DUPLICATION.* 
». FACTOR .* 



CNOP X 01 
««««»B1 *«*««*»»*« 
«EVE AMB3» 

«-»-«-»-«-»-«-»-« ERR 
♦TRANSLATE FIRST*.... 
*TERM M=6« 

»PC=03 C=10 T=03* 

•CORRECT 



X 11 

*»«**B4**»******* 
*OCF » 

* TRANSLATE ».... 

* AND * 

* STORE * 

.CORRECT 



* STORE INTO « 
« INTERMEDIATE * 
» TEXT « 



TYPE CODE 
. CORRECT • 



« « 

*STORE MMM BITS « 
*IN INTERMEDIATE* 
* TEXT « 
« « 



X 13 
«»««*04********** 

* STORE * 

* BOUNDARY » 
*ALIGNMENT BITS » 

* ACCORDING TO * 

* TYPE CODE * 



.* NEXT *. N 

». CHARACTER A .». 
*. COMMA .« 



* NEXT 

CHARACTER 
*. BLANK 



X 05 
«»«««F1 *««*«*«*«* 
»EVE AMB3* 

«-«-«-«■-«-« -«-*-«ERR 
♦TRANSLATE NEXT *.... 
•TERM M=8* 

*PC=05 C=10 T=03* 

•CORRECT 



». TYPE CODE 



* STORE INTO * 

* INTERMEDIATE * 

* TEXT * 



X 16 
»««»«G4********«* 

♦ DCF ♦ 
»-»-»-.»-»~»-.»-»-.»ERR 

* TRANSLATE ♦. . . . 

♦ LENGTH CODE * 

* AND STORE » 

.CORRECT 



«««»«H 1 **«» ««* **« 

* * 
•STORE NNN BITS ♦ 
♦IN INTERMEDIATE* 

* TEXT * 
« « 



.♦ NEXT ♦ 
♦• CHARACTER A 
♦• BLANK .♦ 



•X^ X 09 

Jl ♦• 08 «»»»»J2*****^^^*» 

.♦ ♦• ♦ERR * 

♦ NEXT ♦• NO «««_«_«««.«_»_»«♦ 

CHARACTER A •♦ X^ STORE ERROR * 

♦. BLANK •♦ ♦ FLAGS IN * 

*• •* *EYTES 23 AND 24* 

♦ YES 



X 18 

♦ MULTIPLY ♦ 

♦ DUPLICATION ♦ 

♦ FACTOR BY ♦ 

♦ LENGTH CODE ♦ 

♦ AND STORE ♦ 



* STORE ERROR ♦ 

♦ FLAGS IN « 
♦BYTES 23 AND 24* 



♦ 04 ♦ 

» B5^ 

» * 



« » 

♦SET PARAMETERS ♦ 

♦ FOR BUMP ♦ 

♦ SUBROUTINE ♦ 
» « 



Chart AC, CNOP and DS Translation 
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*A0 
* Bl 



*AD * 
* B4» 



EJECT X 01 
«««*»3 1 »«»««««««« 
♦EVE AMB3* 

»^»-.»-»-.»_«.»-*_«NON-BLANK 

* CHECK FOR ». 

* BLANK » 

* OPERAND » 

•BLANK 
X. 

X 

*04 » 
« B5* 

» « 



END X 08 

«EVE AMB3* 

* TRANSLATE *••.. 

* OPERAND » 
*PC=03 C=80 T=02* 

•CORRECT 



X 09 
«»«»«C4* ♦***«♦**♦ 
♦STORE * 

» STORE INTO » 

* INTERMEDIATE * 

* TEXT * 



02 
*ERR « 

-N' — « — «■_«—«— «>«—«->« 

.* STORE ERROR *X^ 

* FLAG IN » 

* BYTE 24 « 



.* NEXT 
*. CHARACTER 
»• BLANK 



X 11 
««««*D5*«**-)t*«*«« 
»ERR * 

«-*-.«-*-.»-♦-«-»-» 
•X* STORE ERROR * 
» FLAG IN * 
» BYTE 24 » 



* X 

« *04 * 

* » B5* 
« « * 

****it ************************************************************** ************ 

* 
***** * 

»AD * » 

» Fl* * 



ENTRY X 03 
«*»»*F 1*««»«»»««« 
*EVE AMB3* 

«-«•>«-«-«-«>«-«--» ERR 

* TRANSLATE *•••• 

* OPERAND « 
*PC=03 C=20 T=01* 

•CORRECT 



***** 
*AD * 
* G4» 



X 04 
«««»«Gl «*«««*«««« 
*STORE » 

*—*— *~ *—*—*— *^*~* 

* STORE INTO * 

* INTERMEDIATE * 

* TEXT * 



DROP X 12 
««««»G4*')^******-** 
*EVE AMB3* 

*-*-«-»-«-»-»--*-»ERR 
» TRANSLATE ».••• 
« OPERAND » 
*PC=15 C=BO T=01» 

•CORRECT 



X 05 
«««««H1 «*«««**««» 

* STORE * 

* ACTUAL SYMBOL » 

* INTO « 
» INTERMEDIATE » 

* TEXT » 



X 13 

«««»«H4*->t***«->t**« 
»STORE « 

* STORE INTO * 

* INTERMEDIATE * 

* TEXT * 
***************** 



• X^ 
Jl »• 06 
• » *• 
•* NEXT *• NO 
*• CHARACTER A .*... 
*• BLANK .» 



»YES 
• X^ •• 

X 

***** 

»04 » 

* B5» 

* * 



X 07 
*****JZ* ********* 
«ERR « 

•X* STORE ERROR * 
« FLAGS IN * 
♦BYTES 23 AND 24* 
***************** 



* NEXT *• NO 

CHARACTER A .*••• 
*• BLANK •* 



» YES 
•X. ••• 



X 15 

«ERR * 

.X* STORE ERROR » 
» FLAGS IN » 
*BYTES 23 AND 24* 



X 

***** 

*04 * 

* B5* 

* * 



Chart AD. DROP^ EJECT^ END, and ENTRY Translation 
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***** 

*AE * 

* CI* 

* * 



***** 
»AE » 
* C4* 



.* VALID ». NO 
♦SYMBOL IN NAME *..• 
*. FIELD .* 



X 02 
*EVE AMB3* 

«-«-*-»-»-*-*-.»-»£ RR 

* TRANSLATE *.••• 

* OPERAND * 
*PC=03 C=90 T=02* 

•CORRECT 



X 03 
«««««£ 1 «%«««««•»«« 
*STORE * 

* STORE INTO * 

* INTERMEDIATE * 

* TEXT * 



•* NEXT *• NO 
*. CHARACTER A .*.•• 
». BLANK .* 



X 05 
«*«««G 1*« *»*»***» 

* DETERMINE * 

* VALUE AND » 

* ATTRIBUTES * 

* OF SYMBOL IN * 

* NAME FIELD * 



EXTRN X 09 
*****C4********** 
*EVE AMB3* 

*-»-*-»-«-*-♦-*-*£ RR 
* TRANSLATE *.... 
» OPERAND * 
*PC=03 C=20 T=01* 
***************** 
•CORRECT 



X 10 
♦STORE » 

* STORE INTO * 

* INTERMEDIATE » 

* TEXT * 
*««'»•» -N-N- »«««««« -N- « « 



X 11 

««««^«E4*«** ♦♦♦*♦♦ 

* STORE * 

* ACTUAL SYMBOL » 

* INTO » 

* INTERMEDIATE * 

* TEXT * 
***************** 



•* MAXIMUM *• YES 
». NUMBER OF .*.••• 
». EXTRNS .* 
*• •* 
». .* 
* NO 



•* NEXT *• NO 
«. CHARACTER A •»••• 
*. BLANK •» 



* YES 



X 14 
«««««G5 *♦♦♦♦♦♦♦♦♦ 
»ERR * 

.X* STORE ERROR * 
* FLAGS IN * 
♦BYTES 23 AND 24* 



X 

♦ 04 * 

* B5* 
* » 



X 07 

* STORE * 

* VALUE AND * 

* ATTRIBUTES IN * 

* SYMBOL * 

* TABLE » 
***************** 



X 08 
**«»«J2** ******** 
*ERR * 

* STORE ERROR * 

* FLAGS IN * 
*BYTES 23 AND 24* 



X 

*04 * 

» B5* 
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*AF * 
» Bl* 



*AF * 
* B4» 



,IS ICTL LEGAL.*. 



» YES 



X 02 
«*««»C 1 **»»*«*»** 
♦EVE AMB3* 

»-*-«-»-*-»-«-.*-« ERR 

* TRANSLATE «..X 

* OPERAND * 
*PC=01 C=00 T=03* 

.CORRECT 



X 03 
■»««»«D 1 ««»»«»»**« 
♦STORE * 

« STORE INTO * 
» INTERMEDIATE * 
» TEXT * 



» NEXT ». NO 

CHARACTER A .*..X 
». BLANK .* 



OPERAND 

LEGAL FOR 

. SYSTEM . 



X 06 
««'»««G 1 *«***«***« 
♦FORCE STARTING ♦ 
♦COLUMN TO SCAN ♦ 

♦ ACCORDING TO ♦ 

♦ SYSTEM ♦ 
« * 



X 07 
««««*H !♦♦♦♦♦♦♦♦♦♦ 

♦ ERR ♦ 

♦ STORE ERROR ♦ 

♦ FLAGS IN ♦ 
♦BYTES 23 AND 24* 
int***^ *********** 



• X. 

B4 ♦. 

.♦ FIRST ♦. 

START AND 

LOCATION 

• COUNTER • 

♦.ZERO .♦ 

♦ . .♦ 

♦ YES 



X " 09 
«««««C4 ♦♦♦♦♦♦♦♦♦♦ 
♦EVE AMB3^ 

ERR« -»-«-«-.»-* -»-«-« 

. ...♦ TRANSLATE ♦ 

« OPERAND ♦ 
♦PC=03 C=AO T=01^ 
***************** 
.CORRECT 



X 10 
«««««D4^^^^^^^^^^ 
♦STORE ♦ 

«.«-«_«.«.».«.«. 4 

♦ STORE INTO ♦ 

♦ INTERMEDIATE ♦ 

♦ TEXT ♦ 



X 12 
*****E.3********** 

♦ SET LOC. CTR. ♦ 
♦TO ZERO. STORE ♦ 

♦ ID-CODE K AND ♦X, 
♦ERROR FLAGS IN ♦ 

♦ TEXT ♦ 



NO .♦ NEXT ♦. 
...♦. CHARACTER A .♦ 
♦. BLANK .♦ 



X 13 
*****Fi^* ********* 

♦ STORE NAME IN ♦ 
♦TEXT RECORD IF ♦ 
♦LEGAL. SET LOC.^ 

♦ CTR. TO START ♦ 

♦ ADDRESS ♦ 



X 14 

*****Q^t.* ********* 

♦BAR ♦ 

»^« -«-«-» _«^«-«-« 

♦ALIGN LOC. CTR.^ 
♦TO DOUBLE-WORD ♦ 
♦ BOUNDARY ♦ 



X 15 

'N"N"X-«-M'H4^^^^ ♦♦♦♦♦♦ 

♦TLUL ♦ 

It— *—*^it— *'-*—*— *^* 

♦ STORE SYMBOL ♦ 

♦ IN ♦ 

♦ SYMBOL TABLE ♦ 



X 16 
*»»«»E5^^ ♦♦♦♦♦♦♦♦ 
♦ERR ♦ 

♦ STORE ERROR ♦ 

♦ FLAGS IN ♦ 
♦BYTES 23 AND 24^ 



***** 
»04 ♦ 
* B5^ 



X 
***** 

♦ 04 ♦ 

♦ A5^ 
* * 
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***** 
*AG * 
* CI* 



***** 
*A6 » 
* C4» 



ORG X 01 

**»»*C 1 *«»*»»»*»* 
»EVE AMB3* 

»-*-*- »-»-*-.*-»-*ERR 
» TRANSLATE *•... 
« OPERAND * 
*PC=03 C=90 T=02* 
***************** 
•CORRECT 



X 02 

«»«««D 1 **«*««**** 
*STORE * 

* STORE INTO * 
» INTERMEDIATE * 

* TEXT * 

«««««» «"N"X- 'N' «*«»» 'K^ « 



» NEXT « 

CHARACTER A 
». BLANK .« 



X 04 
»»»»*F !**»***»**» 

* DETERMINE * 

* VALUE AND * 
» ATTRIBUTES OF * 

* SYMBOL IN * 
» OPERAND * 
***************** 



Gl 



05 



*. N 

CORRECT •». 
• * 
*. .* 

*• •* 
* YES 



X 06 
«««««H 1*»*»*»»**« 

* * 
*SET PARAMETERS * 
» FOR BUMP * 
» SUBROUTINE * 

* * 
***************** 



SPACE X 08 
*****C^********** 

» SET OPERAND * 

* FIELD IN * 

* INTERMEDIATE * 

* TEXT * 

* TO A ONE « 



X 09 

*****D4********** 
NO *EVE AMB3* 

VALUE*-*-*-*-*-*-*-*-* 
..* CHECK OPERAND * 
* FOR VALUE * 
*PC=00 C=60 T=00* 
***************** 
•VALUE 



X 10 
9t«'K«'«E4********** 
*EVE AMB3* 

*—*—»—»—*-»—*— »—*ERR 

* TRANSLATE *•••• 

* OPERAND * 
*PC=01 C=00 T=03* 
***************** 

•CORRECT 



X 11 
»**»»F 4 ********** 
*STORE * 

* STORE INTO * 

* INTERMEDIATE * 

* TEXT * 
***************** 



X 12 
«**»*F5 ********** 
*ERR * 

*— *—*—*^*— *—*—*— * 

* STORE ERROR * 

* FLAGS IN * 
*BYTES 23 AND 24* 



• X^X. 



***** 
*04 * 

* B5* 



X 07 
*****H2 ********** 
*ERR * 

*'-*-*-*-.*-*-*-*-* 

* STORE ERROR * 

* FLAGS IN * 
*EYTES 23 AND 24* 
***************** 



X 

***** 
*04 * 
* B5* 
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»AH * 
* Bl* 



*AH * 

« B3» 



*AH » 
* B4* 



USING X 01 
«»w««3 1 «««»»«»««« 
*EVE AMB3* 



«-»- 



-«-«-»- 



*TRANSLATE FIRST*. 
.« TERM * 
*PC=03 C=BO T=02* 

.CORRECT 



MACHJ X 08 

»«'K««B3«*« ««««««* 

* SET SWITCH « 
» TO INDICATE * 
» SPNI «. 
« INSTRUCTION » 

* * 
***************** 



MACHB X 09 
»««»«B4** ««»«***« 
*EVE AMB3» 

»-»-«-»-» -»-»-»-»ERR 
...X* TRANSLATE Rl ».... 
*PC=03 M=15* 
*C=00 T=01» 
***************** 
.CORRECT 



* STORE INTO * 

* INTERMEDIATE * 
« TEXT * 



« STORE INTO 
» INTERMEDIATE 
* TEXT 



« NEXT 

CHARACTER A 
«. COMMA 



03 

*. NO 



.*SPM INSTRUCTION* 



X 04 

»««««E1 ********** 
*EVE AMB3* 

*-*-*-*-*-* -«_.*_»£RR 

* TRANSLATE *.... 

* SECOND TERM * 
*PC=15 C=B0 T=01* 
***************** 

.CORRECT 



* STORE INTO 

* INTERMEDIATE 

* TEXT 
*************** 



* NEXT 

CHARACTER 
*. COMMA 



» * , 

*AH *.X. 

* F4* 

MACHI X 13 
««»»»F4* ********* 
*EVE AMB3* 

»_»_»_«_*_»_*_#_«ERR 

*TRANSLATE R2/I *.... 

* * 
*PC=01 C=00 T=01* 
***************** 

.CORRECT 



.X. X 07 

Gl *• 06 «««««G2********** 

.* *. »ERR *« 

.« NEXT *. NO «_«_»_»_»_»_»_»_» 

*. CHARACTER A .* X* STORE ERROR * 

». BLANK .* « FLAGS IN * 

*. .* *EYTES 23 AND 24* 

*, ,» «««««««»«««»««««» 
* YES 



*—*—*—*—*—*—*—*—* 

* STORE INTO * 

* INTERMEDIATE * 
» TEXT * 



*04 * 

* B5* 

* * 



» NEXT * 

CHARACTER A 
*. BLANK .* 



EF07 X 16 
«««*«H5* ********* 
*STORE NUMBER OF* 

* BYTES TO ZERO * 
...X* AND ID-CODE M * 

*IN INTERMEDIATE* 

* TEXT * 
***************** 
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* STORE ERROR * 

* FLAG IN * 

* BYTE 24 * 
***************** 



***** 
*04 * 
« B5* 
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*AI * 
» A2* 



»««»«A2 ********** 

* * 

* SET SWITCH TO * 

* INDICATE * 

* FORMAT 1 * 
« « 



*AI 



*.X, 



E2* 

MACHC X 02 
«««««B2********** 
*EVE AMB3* 

ERp»_.»_*_»_« _»_«_*_« 

•...* TRANSLATE Rl * 

* * 

*FC=03 C=00 T=01* 

.CORRECT 



* STORE INTO « 

* INTERMEDIATE * 

* TEXT * 



w«««»C4********** 
*EVE AMB3* 

....« TRANSLATE D2 » 
« » 

*PC=05 C=00 T=02* 

.CORRECT 



* NEXT 

CHARACTER 
*. COMMA 



X 10 
***»»04* ********* 
*STORE * 

* STORE INTO * 

* INTERMEDIATE * 

* TEXT * 



*. FORMAT TYPE 1.*. 



*****F2* ********* 
*EVE AMB3* 

ERR»— »-»-»-»-«-»-*-« 
X...* TRANSLATE R3 * 
* * 

*PC=01 C=00 T=01* 

•CORRECT 



»»*»»F4********** 

*EVE AMB3* 

ERR*_» _*_»_»_» _»_*_» 

X...* TRANSLATE B2 * 

* * 

*PC=11 C=00 T=01» 

***************** 

.CORRECT 



* STORE INTO * 
« INTERMEDIATE * 

* TEXT * 



* STORE INTO 

* INTERMEDIATE 

* TEXT 



* NEXT * 

CHARACTER A 
*. COMMA .» 



« NEXT 

CHARACTER 
*. ) 



X 16 
«««»«J2*««******« 
*STORE NUMBER OF* 

* BYTES TO ZERO * 

* AND ID-CODE M *X 
*IN INTERMEDIATE* 

* TEXT * 
***************** 



* NEXT » 

CHARACTER A 
*. BLANK .* 



* STORE ERROR * 

* FLAG IN * 

* BYTE 24 * 



»04 * 
» B5* 
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MACHA X 01 
«««««B2 ********** 
*EVE AMB3* 

ERR*-*-*-*-*-*-*-*-* 

....* TRANSLATE Rl * 

* * 

*RC=03 C=00 T=01* 

.CORRECT 



«—*—»—*— 



-«—*—*-« 



STORE INTO 

INTERMEDIATE 

TEXT 



* NEXT 

CHARACTER 
*. COMMA 



*«***E2 ********** 

*EVE AMB3* 

ERR*-*-*-*-*-*-*-*-* 

. ...* TRANSLATE 02 * 

* * 

*FC=05 C=00 T=02* 

***************** 

•CORRECT 



* STORE INTO * 

* INTERMEDIATE * 

* TEXT * 



* NEXT 

CHARACTER 
*. ( 



X* TRANSLATE X2 * 
* * 

*PC=11 C=00 T=01» 

.CORRECT 



X 14 

»««««l-l 1 »««««««««« 
*STORE NUMBER OF* 

* BYTES TO ZERO * 

* AND ID-CODE M *X. 
*IN IMTERMEDIATE* 

* TEXT * 



* NEXT 

CHARACTER 
*. BLANK 



*—*~*—*~*— *—*—*— * 

* STORE INTO * 

* INTERMEDIATE * 

* TEXT * 



* STORE ERROR * 

* FLAG IN * 

* BYTE 24 * 



* NEXT * 

CHARACTER A 
». COMMA .* 



*****j^i* ********* 

*EVE AMB3* »*»« 

*-«-*-»-*-*-*-»-*ERR * * 
X* TRANSLATE B2 *....X* HI * 

* * * * 

*PC=01 C=00 T=01* *«»* 

.CORRECT 



***** 

*04 * 

» B5* 

* * 



YES .* NEXT *. 

...... CHARACTER A .» 

*. ) .* 



*—*-*-*-*-*-*-*-* 
.* STORE INTO * 

* INTERMEDIATE » 

* TEXT * 
***************** 



* * 
« HI * 
» * 
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»AK « 
* B2* 



It**** 

*AK * 

» B3* 

» « 



MACHF X 02 
***»*B2* ********* 
*EVE AMB3* 

,...* TRANSLATE Dl *X, 
* * 

»PC=05 C=00 T=02* 

.CORRECT 



X 03 
«««««C2* ********* 
*STORE * 

«- 'K —«—»—«_«—')('.« -« 

* STORE INTO * 

* INTERMEDIATE * 

* TEXT * 



D2 *. 04 
.* *. 
.* NEXT *. NO 
*• CHARACTER A .*... 
*. ( .* 
*. .* 
*. •* 
* YES 



MACHE X 01 
»»***B3********** 



* SET SWITCH TO * 
•* INDICATE * 

* FORMAT 1 * 



»««»««^«««»«««»«» 



D4 



08 



EGll X 05 
*«*»*E2 ********** 
*EVE AMB3* 

ERR* _■»_»-.»_ *-.» — » — »_« 

X...* TRANSLATE Bl * 

* * 
*FC=11 C=00 T=01* 

* It ************* it* 

.CORRECT 



X 06 
*****F2* ********* 
*STORE * 

*^*-*-*- »-*-»-»-* 

* STORE INTO * 

* INTERMEDIATE * 

* TEXT * 



.* NEXT *. YES 

*. CHARACTER A .*.... 
*. ) •* 



X 13 

«««««H2 ********** 
*STORE NUMBER OF* 

* BYTES TO ZERO * 

* AND ID-CODE M *X. 
*IN INTERMEDIATE* 

* TEXT * 



X 14 
«««*«J2*****«**** 
*ERR * 

* STORE ERROR * 

* FLAG IN * 

* BYTE 24 * 



.* *. NO 

.X».FORMAT TYPE I.*... 

*. .» 

*• .* 

*. •* 

* YES 



NO .* NEXT *. 
...*. CHARACTER A .* 
*• COMMA .* 



X 10 
«****F4********** 
*EVE AMB3* 

ERR*-*-* -»-»-* -*-*-* 
<...* TRANSLATE I * 
* FIELD * 
*PC=01 C=00 T=01* 
***************** 
.CORRECT 



X 11 
*****Qet.** ******** 
*STORE * 

*_*_*-*-*-*_*_*_* 

* STORE INTO * 

* INTERMEDIATE * 

* TEXT * 
***************** 



NO .* NEXT *. 
...*. CHARACTER A .* 
». BLANK .* 



X 

***** 
*04 * 
* 85* 
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*AL * 
* Al* 



* SET 

* TO 
» FORM 



********** 
* 

SWITCH * 
INDICATE * 
AT TYPE 1 * 



»AL ».X. 

* Bl» 

MACHH X 02 

»EVE 
ERR*-*-*-* 



ANSLATE * 
FIELD * 
C=00 T=02* 

.CORRECT 



*. FORMAT TYPE 1. 



* NEXT * 

CHARACTER A 
*. COMMA .* 



» NEXT 

CHARACTER 
*. COMMA 



**C 1********** 
ORE * 

-*-*—*-*—*—*—* 
STORE INTO * 
NTERMEDIATE * 
TEXT * 
************** 



». FORMAT TYPE !•*. 



« C5 *.X. 



*** 



X 22 
»»*#*C5 ********** 
*EVE AMB3* 

...* TRANSLATE * 

* B2 FIELD » 
*PC=19 C=00 T=01* 

X ***************** 
**** .CORRECT 

* • 
H2 * . 



* NEXT » 
CHARACTER A 

* • ( • * 



X 12 
*■» 02 ********** 
E AME3* 

TRANSLATE «..-. 

LI FIELD * 
=03 C=00 T=01* 
************** X 

.CORRECT *« 



X 16 
*»*»«D3********** 
*EVE AMB3* 

*-*-*-«-»-»-* -*-«ERR 

* TRANSLATE *.... 

* L FIELD * 
*PC=01 C=00 T=01* 
***«-»*»**»******* X 

.CORRECT ** 



X 23 

«*»*»D5 ********** 
*STORE * 

*—*—*—*—*—*—*—*—* 

* STORE INTO * 

* INTERMEDIATE * 

* TEXT * 



* NEXT 

CHARACTER 
*. COMMA 



*****= I********** 
*EVE AMB3* 

ERR *_»_*_ *_*_*_«_»_» 

...* TRANSLATE * 

* D2 FIELD * 

*PC=13 C=00 T=02* 

X *»«***»»*******»» 
**** .CORRECT 



* STORE INTO * 

* INTERMEDIATE * 

* TEXT * 
***************** 



**** 

A5 * 
**** 



******** 



STORE INTO 

INTERMEDIATE 

TEXT 



* NEXT 

CHARACTER 
*. COMMA 



* NEXT * 

CHARACTER A 
*. BLANK .* 



**** 

* * 

* H2 *.X 

* * 
**** 

X . 28 
»«**»H2* ********* 
*STORE NUMBER OF* 

* BYTES TO ZERO * 
.X* AND ID-CODE M * 

*IN INTERMEDIATE* 

* TEXT * 
***************** 



*««««J2*****»**** 
*ERR * 

*^*— *—*—*—*—*—*— * 

* STORE ERROR * 

* FLAG IN * 

* BYTE 24 * 



*—*—*—*—*—*—*—* 

* STORE INTO 

* INTERMEDIATE 
» TEXT 



18 
*»»»»F3********** 
*EVE AMB3* 

*_*-*-*_■ »-*-*-»-»ERR 
....X* TRANSLATE *.... 
X * 81 FIELD * 
*PC=11 C=00 T=01* 
, *»*»»**«***»»»*»* X 
**** .CORRECT ** 



********* 



NO 


» 




NEXT 






CHARACTER A 




* 




) 






* 


.* 


X 








**** 






* YES 


* * 








* H2 * 






, 


* * 






X 


♦ *** 






* * 

* Kl * 

* * 
**** 

**** 

* * 

* G5 * 
» * 

**** 



-*—»—*-»—*—» 



* STORE INTO 

* INTERMEDIATE 

* TEXT 



*EVE 



-*—*—*— 



« TRANSLATE * 
* L2 FIELD » 
*PC=01 C=00 T=01* 
*♦»**»«**«*»»**«* 
.CORRECT 



* STORE INTO 

* INTERMEDIATE 

* TEXT 



J5 * . 2 
**** ,* *, 

* * YES .* NEXT * 

* C5 *X....*. CHARACTER A 

* * *. COMMA .* 
**** *, ,« 

* . . * 
* NO 



**** 

* * 

* H2 * 
» * 



***** 
»04 * 
* B5* 
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«»««««*«««««««««««»«««««»««»«« 



CC = COLUMN TO BE SCANNED » 

SC = STARTING COLUMN » 

NC = NUMBER OF CHARACTERS » 

TC = TERM COUNT » 



* ERROR RETURN » 

* » 
*************** 



****************************** 



C3 *. 03 



SEE NOTE 1 



**** 

* * 

* C5 »X. 

**** 



.*.CC LESS THAN .*X. 



*AM * 
* C2* 



*****0^********* 
* 

* SET 

* TC EQUAL TO 

* ZERO 

**************** 



****C5********* 
* 
NORMAL RETURN » 

*************** 



**** 

* * 

* C5 « 

**** 



* E4* 
**** , 

EVEl X 09 
*****£^** ******** 

* * 
»SET SC EQUAL TO* 
*CC AND NC EQUAL* 

* TO ZERO » 

***************** 



EN07 
YES . 



CHARACTER 
. ALPHA- 
*.BETIC.* 



»**»»<53»»*«*»*»** 

* * 

* TURN * 

* ALPHABETIC * 

* INDICATOR OFF * 

* * 
***************** 



*****Q4** ******** 

* * 
» TURN » 

* ALPHABETIC * 

* INDICATOR ON * 
« * 
***************** 



»««*H1 ********* 

* * 

* ERROR RETURN «X. 

* * 
*************** 



EN 11 
YES . 



* * 

* STORE * 
*SYM80L. VALUE. * 

* OR OP-CODE » 

* * 
***************** 



.*.CC LESS THAN .* 



» « 
» C5 * 
» * 



***** 
*AN « 
* Bl« 



«»«« 


* N 


* 




H2 » 




* 


X 


»««» 


«»*«« 




*AN * 




» 83* 




* * 



**** 
* * 

» H3 » 
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5 X 01 

*»«**B 1 »***««»*»« 

»TLUL * «»*»B2******** 

»-«-»-»-»-*-*-*-«ERR * 

» ENTER IN » X* ERROR RETURN 

» SYMBOL TABLE * X * 

* * , ************** 



•CHARACTER AN 



» STORE ERROR * 
* FLAGS IN « 
♦BYTES 23 AND 24* 



*«**F 1 ***»**»»* 

* TO * 

* CONTROL * 

* ROUTINE » 



NO .* 


IS NEXT 


*. 


YES .* IS NEXT *. 




CHARACTER 


• * 


.•.♦.CHARACTER AN .* 


* 


BLANK 


.* 


.*.*.* 




*• •* 






X 


*. .« 




X *. .* 


**** 


» YES 




»*** « NO 




.SEE NOTE 1 


» « .SEE NOTE 


B2 « 






« E2 « 


* 


X 




* * , 


**** 


***** 
*AM « 




»*»* , 




» D2« 




EP021 X 09 




* * 












♦STORE * 

* STORE INTO * 

* INTERMEDIATE * 

* TEXT RECORD * 
***************** 



***************************** 

* 

* 

NOTE 1 * 

CC INCREMENTED BY 1 « 

* 

CC = COLUMN TO BE SCANNED » 

NC = NUMBER OF CHARACTERS * 

SC = STARTING COLUMN * 

* 

T = NUMBER OF TERMS « 



*»********»*«*»***♦ 



!■**«*»»»»»«* 



♦SET INDICATORS ♦ 
♦IN INTERMEDIATE^ 

♦ TEXT ♦ 

* * 



EPOl X 1 

♦ SET SIGN IN 

♦ INTERMEDIATE 

♦ TEXT AND 

♦ RESET SIGN 

♦ INDICATOR 



****»K3^ ♦♦♦♦♦♦♦♦♦ 

* * 
♦DETERMINE SIGN ♦ 
♦OF TERM AND SET^ 
♦SIGN INDICATOR ♦ 

* » 
***************** 



♦SET SC EQUAL TO^ 

♦ CC AND SAVE ♦ 

♦ REGISTERS ♦ 

♦ » 
***************** 



**** 

* * 

* B2 ♦ 

* * 
**** 



♦TRANSLATE VALUED. 



♦TRANSLATE VALUED 



ER04 
YES .♦' 



**** 

* * 

♦ B2 ♦ 



RACTER 
QUOTE 


\ .♦...• 


.♦ 




♦ . .♦ 




♦ NO 




.X. 




5 ♦. 


25 






♦. 


= AO 


.♦ * 












♦ NO 




• 




X 




***** 




♦ AM ♦ 




♦ J2^ 




* * 




♦ 





«««««G4»««»»»»««» 



*»***H5 ♦♦♦♦♦♦♦♦♦♦ 
♦DCXl ♦ 

*—*—*—*— $—*^*—*-* 
♦TRANSLATE VALUE*. 









♦ 


♦• 


* 


NO 






♦. 


NORMAL RETURN ♦ 






IS 


IT A C . 


♦ 




* 




• ♦ 


*************** 


, 




♦ • 


.♦ 




X 




♦ 


. •♦ 




**** 






♦ YES 














♦ B2 ♦ 










» * 










**** 






X 2 




»»»»»K5 






♦DCC 






*. 


-*. 


-*-* 


—*—*—*—*— 



♦TRANSLATE VALUED 
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*A0 * 
» A5» 



* RETRY AND * 

* RECOVERY » 

* ENTRY » 



01 
*innt/^Z** ******* 

* * 

* INOUT * 

* * 
*************** 



*****BZ* ********* 

* * 

* DISABLE » 
•INTERRUPTS. SET* 

* UNIT ADDRESS » 



« * 

« 83 * 

* * 

**** 



IS THIS 

A CHANNEL 

ERROR 









». •* 
* NO 


**** , 








* * , 








♦AC *.X, 








« C2* 








«*«« , 








X 04 






.X. 








C3 *. 


* * 






, * « 


» * 




YES 


.» IS THIS 


« STORE CAW. » 




. . .» 


A UNIT 


* * 




, 


*. CHECK 


* * 






*. .* 






X 


*. .* 






»»««* 


* NO 


**** , 




*AP * 




» * . 




* A2* 




* D2 *.X. C= 


= 2 


» « 




* * .X....... 




* 






** 




.X. 






.X. 


02 *. 5 






D3 *. 


.* ». 






.* IS * 


,* TEST *. 1/2 




.* BUSY AND 


». STATUS OF .* 




* 


. /OR STATUS 


*. UNIT .* 






♦.MODIFIER 



X 33 
*****B/i** ******** 
»SET 'SEREP' ID * 
*CODE FOR CHAN- * 

* NEL FAILURE « 
» SET WAIT CODE * 

* 'AIS' * 
***************** 



09 
»*»*F 1********* 
» « 

^INTERRUPT ENTRY* 
» * 

^************** 



* HI * 

* * 



X 20 
*****H1 ********** 

* RESET * 
♦INTERRUPT ENTRY* 

* SWITCH. * 
*RESTORE LINKAGE* 

* REGISTER * 



* RETURN * 

* VIA CALLING * 
» SEQUENCE * 



*****K1 ********** 

* * 
» SET * 

* READ *X 

* SWITCH * 

***************** 



«***»»E2**«******** 



****** 
**** 



* F2 *.X 



*****F2 ******** 



«««»«»«««« 



*****Q2* ********* 

* SET « 
*INTERRUPT ENTRY* 

* SWITCH * 

* IFF OFF « 

***************** 



*****P3********** 

* * 

* RESET ERROR » 
*SWITCH. RESTORE* 

* REGISTERS * 



»»»»»C4******* 

* SET RECOVERY * 
♦ADDRESS IN NEW * 

* EXTERNAL PSW * 

* * 
************** 



♦ ERROR HALT 

♦ (EXTRN INTRPT 

♦ TO RECOVER) 
**************** 



»*»»E4****^^^^* 
* 

* INTERRUPT 

» 

*************** 



*****Fi^* ********* 

* * 

* SET ♦ 
X^ INTERRUPT ♦ 

♦ ENTRY SWITCH ♦ 

♦ * 
***************** 



YES IS THIS A TAPE 


...♦. ERROR 




• ♦• 


. * 


. ♦. 


»* 


X ♦. .♦ 




♦«««» ♦ 




*AP ♦♦♦♦♦ 




* E2^^ ♦ 




♦ ♦ *A0 ♦... 




♦ * B5* 




«»»» , 





* IS THE *. 


YES .* 


IS IT 


RETRY SWITCH .* 






CHANNEL 


*. ON .* 


, 


* 


END 


*. .* 








*. . * 


X 




*. •* 


* NO 


**** 

* * 

* HI * 

**** 




* NO 



IS PRTR 

SELECTED 

UNIT 



*****J2** ******* 



***************** 



.CONTROL UNIT .* 

*.0R DEVICE.* 

*. END .* 



* A5 * 
**** 



*****j 4* ****** 

* * 

* SET RECOVERY « 
*ADDRESS IN NEW 

* EXTERNAL PSW * 

* * 
************** 



«»***K4 ********** 

♦ * 

♦ RESET * 
X*INTERRUPT ENTRY*. 

♦ SWITCH * 

♦ * 



X 34 
«*«««B5*^^^^^^^^^ 
♦SET 'SEREP' ID ♦ 
♦CODE FOR DEVICE^ 

♦ FAILURE. SET ♦X 

♦ WAIT CODE ♦ 

♦ "AIS* ♦ 
***************** 



35 
«»»*«C5 ♦♦♦♦♦♦**** 
*SET 'SEREP' ID * 
*CODE FOR DEVICE* 
.* UNAVAILABLE. * 
*SET DEVICE ADDR* 
*IN OLD I/O PSW * 

SET WAITXCODE 'AIS' 



**** 

* * 

* C5 * 

* * 
**** 



***** 






■*** 



* NOTE 

*IF ENTRY IS FROM 
*SEREP INTERFACE, 
*PROGRAM IS NO LON- 
*GER RECOVERABLE 



******* 



****** 



*»**K5******** 

* RETURN 

* VIA OLD 

* I/O PSW 
«****«*«****** 



* B3 * 

» * 

»*** 
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* * 

* SET RETRY SW. * 

* SAVE OLD I/O « 
*PSW,CSW.AND CAW* 

* * 



***»«A3»*****»»** 
« * 

* SET WRITE AND * 

* WRITE/SKIP ♦ 
»RETRY COUNTERS.* 
» * 



IS THIS 
THE FIRST 
ERROR . 



* SENSE DEVICE * 

* * 



«««»«««««««««««»« 



* SET * 

* ERROR * 

* SWITCH * 
« * 



C2 *. 03 



C5 *. 08 

• * * • 
NO IS READ SWITCH 



*«»»»D2********«* 
» * 

* RESTORE OLD * 
» I/C PSW. CSW, *. 

* AND CAW * 

* * 
***************** 



ALL 
READS OR 
. WRITES 

*.MADE .* 



READ SWITCH 



*»»*« 05 ********** 

* * 

* SET * 

* READ RETRY * 

* COUNTER * 
» * 



***** 
*A0 * 
♦ B5« 



*AP * 
* E2* 
**** 



READ SWITCH 



**** 
* 
* A3 



IS IT 

7 TRACK 

TAPE 



**** 

* * 

» A5 *X, 

* * 
**** 



*****F3********** 

* * 

* RESET * 
» WRITE RETRY * 

* COUNTER * 



*—*-»—*—*—»—*— 



**«*»»***»* 



**** 
* * 

» A5 *X. 



*-*-*-*-*-*-*-*-* 

* * 

* SKIP TAPE * 

* * 
***************** 



***** 

*A0 * 

* C2* 

* * 



***** 
*A0 « 
* B5« 



Chart AP. Tape Read/Write Retry Procedures 
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PHASE II 



SECTION 1: INTRODUCTION 



Each TXT card may contain 
several source statements. 



the text from 



The major functions of Phase II of the 
Assembler Program are as follows: 



Translate Intermediate Text into Machine 



Language 



The Intermediate Text, which contains 
the partially translated source statements 
developed by Phase I , are translated into 
machine- language statements which make up 
the object program. 

The symbols contained in the source 
statements are replaced with the actual 
machine addresses which can now be obtained 
from the Symbol Table developed by Phase I. 

The type of translation that occurs 
depends upon the ID-Code in the Intermedi- 
ate Text and upon the instruction format. 

The operand field, part of Intermediate 
Text, is translated and placed in the 
output buffer area to be punched into a 
card or written on tape, and printed as a 
line in the object program listing. 

The translation of each instruction for- 
mat type is shown in Section 5, 
"Intermediate Text Translation." The sub- 
routines used by Phase II to translate the 
Intermediate Text are discussed in Section 
3, "Subroutine Description." 



Produce Output Cards 



The assembler produces three types of 
cards or card images on tape to be loaded 
as part of the object program. They are 
the ESD (External Symbol Dictionary) , RLD 
(Relocation List Dictionary) , and TXT 
(Text) cards. The format for each type of 
card is shown in Figure 10 at the end of 
this discussion. 

The ESD cards are produced at the begin- 
ning of Phase II processing. One ESD card 
is punched for each START, EXTRN, and ENTRY 
Assembler instruction. 

The TXT cards are produced during Phase 
II processing. When an output buffer entry 
becomes full, one text card is punched. 



The RLD cards are produced at the end of 
Phase II processing. The RLD cards are 
punched from the RLD Table (see Section 2, 
"Tables") . RLD cards are produced for each 
relocatable address constant and Channel 
Command Word defined in the source program. 

ESD and RLD Cards; The ESD cards are 
produced to provide complete linkage 
between separate program segments. The RLD 
cards are produced to allow the Relocating 
Loader to reevaluate symbols and expres- 
sions within address constants and Channel 
Command Words in relocated segments. (For 
a description of the Relocating Loader, see 
IBM System/360 Basic Programming Support 
Basic Utilities , Form No. C28-6505.) 

These cards become input to the Relocat- 
ing Loader, which in turn creates an Exter- 
nal Symbol Identification Table (ESID) and 
a Reference Table to provide communication 
between the ESD's and RLD's of various 
program segments. Collectively, the RLD's 
and ESDs are called the Control Dictionary. 

When a START statement was encountered 
by the assembler. Phase I assigned the 
symbol in the statement the identifying 
number 1, which is entered into the Ref- 
erence Table by the loader, along with the 
program segments relocation factor (the 
difference between the address where the 
segment was assembled and the address where 
it is loaded) . Identifying number 1 was 
also assigned to the symbols appearing in 
the operands of all ENTRY statements in 
that assembly. 

For EXTRN statements, the assembler 
assigned each external symbol an identify- 
ing number ranging from 2 through 15, 
indicating the order in which the EXTRN 
Assembler instructions were found in the 
source program. This num.ber is placed in 
one of the Control Dictionary tables by the 
loader, along with a pointer to the Ref- 
erence Table which includes the external 
symbol and its actual address (inserted 
from START and ENTRY ESD cards in other 
program segments) . This allows the loader 
to implement cross-referencing. 

The identifying num.ber associated with 
the external symbol also appears in the RLD 
cards produced by the assembler. This 
allows address constants with either inter- 
nal or external symbols to be properly 
evaluated. 
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TXT Cards; The object text to be loaded by 
the loader appears on the text cards. The 
TXT cards will contain a maximum of 56 
bytes of information (columns 17-72) . 
Therefore r each TXT card may contain the 
text from several source program state- 
ments. If less than 56 bytes are specified 
for one TXT card, the remaining columns of 
the card are blank. 

The text is produced in the order in 
which it is declared by the source program. 
TXT cards, therefore, are not necessarily 
in order by origin (tentative loading 
address). For example, an ORG statement 
may cause the program to skip a block of 
addresses and later in the source program 
these addresses may be referenced by anoth- 
er ORG statement. 

A TXT card is terminated and a new one 
begun whenever there is a break in the 
string of specified storage content 
(boundary alignment excluded) , whenever a 
total of 56 bytes of continuous text has 
been accumulated, or whenever a DC Assem- 
bler instruction with a duplication factor 
is encountered. An ORG statement, whether 
it results in a change of location counter 
value or not, is considered to be a break 
in the string of specified storage content. 
Any DS Assembler instruction (except one 
with zero length and no boundary alignment 
needed) is also considered to be a break. 

Boundary alignment caused by an instruc- 
tion being coded at an odd byte boundary, a 
CNOP coded at an odd byte boundary, a DC 
Assembler instruction without a duplication 
factor, or a CCW Assembler instruction, 
will not cause a new TXT card to be 
started. Instead, zeros will be inserted 
into the bytes that are skipped to perform 
the alignment. 

A DC instruction with a duplication 
factor will cause a new TXT card to be 
produced after the necessary alignment is 
done. The new TXT card, and those follow- 
ing, will contain a multiple of the bytes 
that are to be repeated for as long as the 
bytes fit on the card, or until all desired 
data is put on cards. The last card, 
whether full or not, will not be used for 
any other text. The text developed from 
the statement following the DC statement 
will be put on the following card. 

For example, the source statement DC 
5CL16'A* will produce the following cards: 



Card 1 |1 16|17-32|33-48|49-64|65-80| 
I Control I I I I I 
linfor- I II I I 
jmation |A |A |A | | 
L„ X ^^ — X X X J 



Card 2 



|1 16| 17-32|33-48|49 
I Control I I I 
linfor- I I I 
jmation |A |A j 

L . X „X X 



801 



Card 3 



|1 16|17 - 72|73-80| 
I Control I Text from the | | 
I inf or- I following state- j | 
jmation j ments j j 

L X X J 



Card Formats ; The formats of the different 
types of cards produced by Phase II of the 
Assembler Program are shown in Figure 10. 
The ESD and TXT card form^ats are self- 
explanatory. The RLD card format is 
described in detail in the discussion that 
follows. 

The position header, which is two bytes 

long, is the relocatability attribute 

(external symbol identification) assigned 

by the assembler to the program segment in 

which the constant is being defined. 

The relocation header, which is two 
bytes long, is the relocatability attribute 
that was assigned to the address symbol 
when it was defined in the operand field of 
an EXTRN Assembler instruction. It is the 
same as the external symbol identification 
assigned to the symbol in Phase I. 

The address is the value of the relative 
assembled address of the relocatable con- 
stant within the program segment indicated 
by the position header. In the case of a 
CCW, the address constant is the value of 
the location counter plus one. This 
address points to the second field of a 
CCW. 

All RLD's with the same position and 
relocation headers will be grouped, in the 
order found, into one card image. 

The flags are as follows: 



Complement Flag - this one- bit flag 
indicates to the loader whether the 
relocation constant for the program 
segment indicated by the relocation 
header need be added or subtracted 
from the address constant. 
Continuation Flag - a 1 indicates that 
more addresses with this relocation 
and position header are on this card; 
a indicates that this is the last 
address with this relocation and posi- 
tion header (another relocation and 
position header could follow on this 
card) . This flag occupies one bit. 
Size - this two-bit flag indicates the 
size of the symbol (10 - three bytes; 
1 1 - four bytes) . 



2. 



3. 
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EXTRN^ 



I i|2 3 4|5 -10|11 12|13 ^^\^5 16|17 

I— + + + + + +- +- 

112 1 I I I I I Symbol | 
I 2|E S D| I 1 6 I lESID | from | 
I 9 1 I I I I no. I operand | 
L J. X . X ± X X X. 



22|23-24|25|26 - 28|29 



80 



-+~+ h 

I I Address I 
I 21 of I 
I I symbol | 

-X X X- 



Blank 



ENTRY '^-^ 



J. — ^ ^ .^ ^ ^ 

I 1|2 3 a|5-10|11 12|13 14 15 16|17 

I 1 2 1 I I i I . Symbol 
I 2|E S D| I 1 6 I I from 
I 9| j I I I operand 
L X X X X X 



22|23-24|25|26 - 28|29 30|31 32|33 ~ 80 

I I I Address I | | 
I I 1 I of I lESlD I Blank 
I I I symbol | | no . | 
X X X . X X x^ 



START'' -2 



I 1|2 3 4|5 ~10|11 12|13 14|15 16|17 
I— + + + + + + 



T r — T 

22|23-24|25|26 



28|29|30 31 32|33 - 80 



-+--+- 



-+~+- 



I 12 I 

I 2|E S 

L X 



I 1 6 I 
I I 

-X X- 



I I Symbol 
|ESID I from 
I no. I operand 



I I Address I 
I 0| of I 
I I symbol | 

_X X. X- 



I No. of I 

I bytes inj Blank 
I program j 



END^ 



r — T 

I 1|2 3 

h~+— - 

|12| 

I 2|E N 

L X 



'T-T — 

|5|6 



8|9 -14| 15 16| 17 



80 



I I Blank or | | | 
D I [address to | | ESID | 

I (transfer to| j no. j 
X-X X X X- 



Blank 



TEXT^ 



I 1|2 3 4|5| 6-8 |9 10|11 12|13 ia|15 16|17 

h-i +-+ + + + + + 

I 121 I I I iBytesj | | 
I 2|T X T| I Start I I on j JESID | 
I 9| I lAddr. | | card | I no. | 

L X . — X_X X X X X — . X 



72|73 - 80 

I 

I Blank 

I 

X 



Text 
(one byte per column) 



RLD^ 



r — T 

I 1|2 3 

I— +- 

I I 
|12| 
I 2|R L 



a|5 -10|11 12|13 14 15 16|17 - 20|21|22 - 2a|25|26 - 28|29 - 72|73 - 80 



I 

I 
_X- 



I Bytes I 

I on I 

I card I 

I I 
-X X. 



IF 

Position |L 

and Reloca-|A 

tion hdrs . | G 

IS 

X 



IF I 

IL I I I 

Address I A | Address | (see note 3) | Blank 

|G j I I 

IS I I I 

X X X X 



j ^ All cards are produced in extended card code. It will be necessary to convert these | 

I records from extended card code to get the hexadecimal values. j 

I ^ Columns 11 and 1 2 on the ESD cards will contain extended card code punches j 

I 12-0-1-8-9 and 12-11-1-8-9, respectively (decimal 16) . j 

I ^ These bytes are the same as bytes 21-24 and 25-28 until new position and relocation | 

I headers are required. Then bytes 17-20 will be repeated with the new values. | 

L ; . , - J 



Figure 10. Output Formats 
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Produce Object Program Listing 



The object program listing produced by 
Phase II has the format shown in Figure 11, 
part B. The only exception will be com- 
ments statements, which are reproduced on 
the listing exactly as the source program 
statements appear. 

For example, if the first statement of a 
program is as shown in Figure 11, part A, 
and the program is to be assembled starting 



at location 80 (specified by the START 
Assembler instruction) , the line on the 
object program listing would appear as 
indicated in Figure 11, part C. If the 
statement contained an error, the error 
flags would be printed to the left of the 
location counter. 

Although the source program statement 
will produce one line of listing, several 
source statements may be reproduced on a 
TXT card, as indicated in the previous 
discussion. 



j Name | Operation | Operand | Comments | ID-Seq. j 
I 1 

I SETBAS I BALR | 14,0 | LOAD BASE REG 14 | 1080 | 

L J 

A. Input Statement 

r 1 

I ERROR I LOCATION | ASSEMBLED MACHINE | SOURCE PROGRAM j 

I FLAGS I COUNTER | LANGUAGE STATEMENT | STATEMENT | 

L . J 

B. Listing Format 

J. -, 

I 000080 05 EO SETBAS BALR 14,0 LOAD BASE REG 14 00001080 j 

L J 

C. Print Line 



Figure 11. Object Program Listing Example 
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SECTION 2: TABLES 



RELOCATION LIST DICTIONARY (RLD) TABLE 



REGISTER TABLE 



The Register Table contains the general 
register numbers, their corresponding 
values r and relocatable attributes. An 
entry is made into this table each time a 
USING Assembler instruction is encountered. 
An entry will be deleted from the table 
each time a DROP Assembler instruction is 
encountered or when a USING statement uses 
a previously entered register. 

Note; Using Register zero will not drop 
Register zero with an absolute attribute. 
Register zero is placed into the table by 
the assembler and remains in the table. 



The RLD Table is constructed to hold the 
data necessary for producing RLD cards or 
tape records at the conclusion of Phase II 
processing (see Introduction to Phase II 
for description of the RLD cards) . 



Entries are made into the RLD Table for 
three- or four- byte relocatable address 
constants and Channel Command Words. Each 
entry in the RLD Table occupies a single 
32-bit word and has the following configu- 
ration: 



The Register Table is referenced when- 
ever it becomes necessary for the assembler 
to compute addresses (i.e., assign base 
registers and displacements) . 

The values assigned to the registers are 
relocatable. 

Each entry in the table occupies a 
single 32-bit word and has the following 
configuration: 



J. „^ . ^ ^-^ ^ 

I 0-3 I 4-5 I 6 |7| 8-31 | 



Relocation! Size jcomple- 
header j indicator j ment 
I I flag 
I I 

X X X-.X_ 



Address 
pointer 



I RELA I 
L X. 



VALUE 



REG 



4 bits 
where : 
RELA 
VALUE 



24 bits 



4 bits 



the relocatability value 



REG 



indicates 
(0-15) 

is the value of the 
the operand field 
statement 

indicates the general register that 
is assigned the above value 



expression m 
of the USING 



Each of these entries is discussed in the 
Phase II Introduction under, the RLD card. 



At the end of Phase II, the RLD Table is 
scanned, and the entries having the same 
position and relocation headers are grouped 
into a single card image for producing an 
RLD card or tape record. Error flag K is 
indicated on all address constants and 
Channel Command Words in excess of the 
number allowed for the RLD Table. 
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SECTION 3; SUBROUTINE DESCRIPTION 



This section describes the subroutines 
of the Assembler Program that are used 
during Phase II processing. 



Undefined: Error flag U is placed in the 
print buffer. One of the following proce- 
dures is then followed, depending upon the 
instruction type. For instruction types 
not indicated r no further action is taken 
and control is returned to the calling 
routine. 



SER - Simple Expression Translation Routine 



The SER subroutine is used to translate 
a field in the Intermediate Text that 
contains a simple expression (i.e., the R1 
field of an RR format machine instruction, 
the operand field of a DROP Assembler 
instruction, etc.) , and to translate each 
term of a compound expression. 

This subroutine is entered with the 
following parameters, which are set by the 
calling routine: 

COL indicates the first column of the 
Intermediate Text to be scanned, 

LGH indicates the number of four-bit 
fields used in the output buffer 
area. 



Machine Instruction: The operand field 
of the output area is set to zero. The 
operation code remains unchanged. Control 
is returned to the Phase II Control Rou- 
tine. 



CCW or DC Assembler Instruction: 



The 

entire output area for the instruction is 
set to zero. Control is returned to the 
Phase II Control Routine. 

DROP^ USING, EXTRN. or ENTRY Assembler 
Instruction: Error flag N is placed in the 
print buffer along with error flag U. Only 
the source statement and the error flags 
will be printed. Control is returned to 
the Phase II Control Routine. 



Defined: The symbol value and the reloca- 
tability attribute (RELA) are placed in a 
temporary output area, and the procedures 
described under Common are then followed. 



TXT indicates the rightmost bit in the 
output buffer area into which the 
translated expressions are to be 
placed, 

NBT indicates the number of bytes of 
input to be translated. 



After the field is translated, the out- 
put parameter RELA will be set to indicate 
whether the expression is absolute or relo- 
catable. RELA will have one of the follow- 
ing values: 

the expression is absolute, 
1-15 the expression is relocatable. 

The field of the Intermediate Text indi- 
cated by the above parameters is checked 
for a self -defining value or a symbol. 
(Fields 1, 3, and 4 of a CCW instruction 
are checked for absolute values. If one of 
the fields is not absolute, error flag R is 
placed in the print buffer and the entire 
output area for the CCW is reset to zeros.) 
Depending upon the value, one of the fol- 
lowing procedures plus the Common procedure 
is followed. 

SYMBOL: If the value is a symbol (P bit of 
the Intermediate Text a 1) , the defined bit 
of the Symbol Table entry is checked. If 
the symbol is undefined, the procedures 
described under Undefined are followed. If 
the symbol is defined, the procedures des- 
cribed under Defined are followed. 



SELF-DEFINING VALUE; RELA is set to zero 
since a self -defining value is absolute, 
and the absolute value is placed in a 
temporary output area. The procedures des- 
cribed under Common are then followed. 

COMMON: If the translation of the field is 
not complete (parameter TXT not equal to 
zero) , control is returned to the calling 
routine. If the translation is complete 
(TXT equal to zero) , the output buffer is 
Checked to see if the value will fit into 
the buffer. 

If the value will fit, it is stored in 
the output buffer by subroutine STXT, and 
control is returned to the calling routine. 

Note: If the value is the L field of an SS 
format instruction, the value is reduced by 
one before it is stored. L with a value of 
zero is processed the same as an L field 
with a value of one. The value of zero is 
not reduced. 

If the value will not fit, error flag T 
is placed in the print buffer, and one of 
the following procedures is used. 

Machine Instruction : If the value is a D1 
or D2 field and is absolute, the value is 
truncated and stored in the output buffer. 
For all other fields, the operand field of 
the output buffer for this instruction is 
set to zero. The operation code, however, 
remains unchanged. Control is returned to 
the Phase II Control Routine. 
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CCW Assembler Instruction; The entire out- 
put buffer for this instruction is set to 
zero and control is returned to the Phase 
II Control Routine. 

USING and DROP Assembler Instructions: The 
entire statement is ignored and control is 
returned to the Phase II Control Routine. 

Other Assembler Instructions; The trans- 
lated value is truncated and then stored in 
the output buffer by subroutine STXT. Con- 
trol is returned to the calling routine. 

When control is returned to the Phase II 
Control Routine by subroutine SER, the 
remaining fields of the Intermediate Text 
for that instruction, if any, are not 
translated. 



Machine Instruction, CCW or DC Type A 
Assembler Instruction: Error flag A is 
placed in the print buffer, the output 
buffer for the instruction is set to zero 
(the operation code remains unchanged for a 
machine instruction) , and control is 
returned to the Phase II Control Routine. 

USING Assembler Instruction; Error flags A 
and N are placed in the print buffer. Only 
the source statement and the error flags 
are printed in the object program listing. 
Control is returned to the Phase II Control 
Routine. 



END Assembler Instruction; 



Error flag A is 

in the print buffer, and control is 



placed 

returned to the calling routine. 



EER - Compound Expression Translation 
Routine 



This subroutine is used to translate the 
fields of the Intermediate Text that may 
contain a compound expression (i.e., D2 
field of a machine instruction, second 
expression of a CCW Assembler instruction, 
etc.) . The parameters set by the calling 
routine are the same parameters that are 
set for the SER subroutine (see preceding 
discussion) . 

The compound expression may contain a 
maximum of three terms. Each term is 
translated by subroutine SER. After each 
term has been translated, several tests are 
made to determine the validity of the 
terms. 

The following conditions must be met; 

1. If one relocatable term is used, it 
cannot be preceded by a minus (-) 
sign. 

2. If two relocatable terms are used, one 
of the two terms must be minus (-) , 
and the value of RELA for both terms 
must be equal. 

3. If three relocatable terms are used, 
there may be only one minus (-) sign, 
and the value of RELA for all three 
terms must be equal. 

4. If the sign of a term is multiply (*) , 
the terms preceding and following the 
sign must be absolute. 

If these conditions are met, the proce- 
dures described under Common are followed. 

If these conditions are not met, one of 
the following procedures is used, depending 
upon the instruction type. Only the 
instructions that may have a compound 
expression in the operand field are indi- 
cated. * 



COMMON: The value of RELA is set to the 
relocatability attribute of the symbols, 
and the terms are combined according to 
their signs. The result is stored in a 
temporary save area. 

The only negative answer that is allowed 
is for a DC type A instruction with a RELA 
value of zero. If the answer is negative 
for any other instruction type, or RELA is 
not zero for a DC type A, error flag Y is 
placed in the print buffer. 

If the answer is positive, or after 
error flag Y is placed in the print buffer, 
one of the following procedures is used. 

Machine Instructions: If a base register 
is not indicated, the values of the base 
register and displacement are obtained from 
the Register Table by subroutine MARS and 
stored in the output buffer. Control is 
then returned to the calling routine. 

If a base register is indicated, the 
value of the displacement should be abso- 
lute. If it is not, error flag R is placed 
in the print buffer before the displacement 
is tested to see if it is equal to, or less 
than, 4095, the maximum value allowed. 

If the displacement is too large, error 
flag T is placed in the print buffer, the 
value is truncated and stored in the output 
buffer by subroutine STXT, and control is 
returned to the calling routine. 

If the displacement is correct, the 
value of the combined terms is stored in 
the output buffer, subroutine SER is 
entered to translate the base register 
field, and control is returned to the 
calling routine. 

Assembler Instructions: The value of the 
combined terms is placed in the output 
buffer by subroutine STXT, and control is 
returned to the calling routine. 
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SWPT 
Setting 



Meaning 



When Used 



Normal - print location counter, 
assembled data and source statement 



For all correctly assembled 
instructions 



Duplication - print location 
counter and assembled data 



DC instruction with a dupli- 
cation factor or a non-zero 
CNOP 



Zero fill - print location 
counter and assembled data 
(zeros) 



Location counter not aligned 
to a half-word boundary for 
a machine instruction 



Comments 
only 



print source statement 



Non-blank card with an 
incorrect ID- Code 

CNOP zero 

USING with an absolute value 

A relocatable value preceded 
by a minus sign 

EJECT, ENTRY, EXTRN, SPACE 

DS, START 



Print location counter and 
source statement 



16 



Internal repeat switch 



Assembler instruction with a 
size greater than 8 



32 



Print new location counter and 
source statement 



END, EQU, ORG 



H- 



64 



Print value (USING) or 
register number (DROP) 



USING, DROP 



128 



j Space control (no printing) 



SPACE 



Figure 12. Print Control Switch (SWPT) Setting 



PRTA - Print Subroutine 



This subroutine is entered after the 
translation of each source statement is 
complete. It is used to print a line in 
the object program listing. 



The PRTA subroutine also counts the 
number of lines printed per page; when the 
count exceeds 56, the printer is ejected to 
the next page. 

After a line is printed, control is 
returned to the calling routine. 



The data, instruction, and location 
counter are translated into their hexadeci- 
mal equivalent by subroutine TRAN and 
placed in the assembled machine instruction 
portion of the print line. A line of the 
object program listing is then printed by 
subroutine INOUT. 

The number of columns that are printed 
and the contents of the print line are 
dependent upon the setting of switch SWPT. 
This switch is set by the routine that 
calls the PRTA subroutine. The settings of 
the switch, their meanings, and when used, 
are shown in Figure 12. 



PCHA 



Store into Punch Buffer Routine 



This subroutine is entered after the 
translation of a machine instruction or a 
DC, CNOP, or CCW Assembler instruction. 
The translated text is placed in the punch 
buffer up to a maximum of 56 bytes. 

The actual punching of a card is under 
the control of the Phase II Control Rou- 
tine. 



Control is returned to the calling 
tine. 



rou- 
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Punch RLD and END Cards Routine 



FERR - Store Error Flags Routine 



This subroutine is entered after the END 
statement has been processed. 

The RLD Table is searched, and all RLD's 
with the same position header are grouped 
into one card image (or until a card is 
full) and produced. (See Phase II Intro- 
duction for RLD card layout and Section 2, 
"Tables," for a description of the RLD 
Table.) 

After the RLD cards are produced, the 
END card format is punched, and the program 
halts. 

If the output is tape, an "LDT* record 
is written on the tape after the 'END* 
record. The tape is then backspaced over 
the LDT record, so that in a stacked 
assembly all LDT records but that following 
the last object program are overwritten. 



DOUT - Punch TXT Cards Routine 



This subroutine is entered from the 
Phase II Control Routine whenever enough 
data to fill an output buffer has been 
accumulated, and, if it is a card system, 
when a blank card is available. 



The FERR subroutine places the necessary 
error flags in the print buffer. These 
flags are those placed in the Intermediate 
Text by Phase I and the flags for the 
errors encountered during Phase II process- 
ing. 



The following error flags may be placed 
in the print buffer by Phase II: 



r T" 

I Flag I 

\ 1- 



K 
U 

W 

X 
Y 



Meaning 

Expression cannot be mapped into 
a base register and displacement 

RLD Table full 

Undefined symbol 

Unused mask bits in CCW instruc- 
tion not zero 

Duplicate ENTRY statement 

Illegal negative expression in 
operand field 



L J. 



J 



The necessary control information is 
placed in the card image along with the 
translated text. (See Introduction to 
Phase II for TXT card layout. Figure 10.) 
The card image is then punched or written 
on tape, depending upon the system being 
used. 



Note; See "Phase I", Section 3, Subroutine 
Description, subroutine ERR for Phase I 
error flags and flags common to both 
phases. 



Control is returned to the Phase II 
Control Routine except when the output 
buffer is emptied after the END card is 
read. Control is then transferred to out- 
put RLD and END cards (see preceding 
discussion) . 



INPUT - Input/Output Subroutine 



This subroutine is the same subroutine 
used by Phase I. Refer to "Phase I," 
Section 3, "Subroutine Descriptions." 
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SECTION 4: PHASE II PROCESSING FLOW 



This section uses two charts to describe 
the overall processing flow of Phase II of 
the Assembler Program. Chart 06 illus- 
trates the initialization procedures, and 
Chart 07 illustrates the Control Routine. 
The numbers in parentheses within the text 
describing each chart indicate the block on 
the chart being explained. 



INITIALIZATION - CHART 06 



Phase II of the Assembler Program is 
read into main storage. The new PSW's are 
loaded into main storage, and the print 
buffer is set to blanks (01) . The type of 
input is then checked (03) . The printer is 
ejected to a new page and a heading is 
printed. 

If the input control indicates that 
Phase I assembled on tape, the tape unit is 
selected, the read parameter is set to read 
104 bytes (one input record on tape) , and 
the input tape unit is rewound (04-05) . A 
card image is then read from tape (06) , and 
control is transferred to complete the 
initialization processing (09) . 

If the input control indicates that 
Phase I assembled on cards, the first card 
is read and checked (06-07) . If the card 
is a Symbol Table card, the rest of the 
Symbol Table deck is read into the area of 
main storage reserved for the Symbol Table 

(10) i The Symbol Table deck will not be 
included when Phase I assembled on tape 

(Phase II must immediately follow Phase I) , 
or when Phase II immediately follows Phase 
I in a card assembly, because the Symbol 
Table will still be in storage. 

The type of object output is checked, 
i.e., tape or card (09.1), and the 
appropriate parameters for the output are 
modified (13,15) and control is then trans- 
ferred to location C811 in the Control 
Routine (Chart 07, block 07) (05-06) . 

A test is made to determine what type of 
printing device is on line. One of the 
following then occurs: 

1. If the off-line printing option is 
used, the parameters for off-line 
printing are modified (16) . 

2. If both a printer (1443/1403) and a 
typewriter (1052) are available, no 
modifications are made. 

3. If the printer is used as a typewrit- 
er, all warning messages will be list- 
ed on the printer. However, if the 
programmer uses the no- print option. 



these warning messages will not be 
printed but will only be displayed in 
the I.e. lights on the console. 

4. If the typewriter is used as a print- 
er, modifications are made so that an 
EJECT instruction will be processed as 
a SPACE 6 instruction. 

5. If no device is available, all print- 
ing is inhibited (including error 
flags) . 

The RLD Table is set up according to the 
size of main storage, the number of output 
buffers is determined, and the header for 
each is cleared (08) . The number of buf- 
fers is determined by dividing the unused 
main storage into 64-byte fields. This 
number is then placed in locations NOPB 
(number of output buffers) and NBL (number 
of buffers left) for later use in the 
processing routine. 

The first output buffer is set up to 
contain a START format with a blank program 
name and a starting location of zero. This 
is done to guard against the possibility of 
a programmer not specifying a START, with- 
out which the object program is not reloca- 
table. If the program contains a START 
statement it will overlay the pseudo-start. 



CONTROL ROUTINE - CHART 07 



Note: The discussion of the Control Rou- 
tine starts at location C811 (07) since 
this is the initial entry point from the 
initialization routine. 



General 



The card image, when the 1442 card 
read-punch unit is used, is checked for a 
blank. If the card is blank, the output 
buffer area is checked to determine if 
enough information has been processed to 
fill an object program card or card image 
on tape (8) . If not, the blank card is 
ignored and control is transferred to loca- 
tion C819 (10) for further testing. If an 
output buffer is full, an object program 
card is produced by subroutine DOUT (09) 
before control is transferred to location 
C819 (10) . 

If the card is not blank (07) , or the 
object program card has been produced (09) , 
the ID-Code of the Intermediate Text is 
checked (10-14) . 

If the ID-Code is B or K (10) , indicat- 
ing an Assembler instruction, control is 
transferred to location* C827 to determine 
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which Assembler instruction is to be proc- 
essed (byte 2 of the Intermediate Text is 
checked) , and control is transferred to the 
routine necessary to translate that 
instruction (see section 5^ "Intermediate 
Text Translation") . The return to the 
Control Routine varies with the type of 
instruction and is shown in Section 5. 

If the card was blank (11) , as it would 
have been if an object program card had 
just been produced, control is transferred 
to location C804 (01) to set up for proc- 
essing the next statement. 

If the ID-Code is A, J or M (12) , 
indicating a machine instruction or error 
type M, control is transferred to location 
C8231 (20) to translate the machine 
instruction (see Machine Instruction Proc- 
essing section) . 

If the ID-Code is L or C (U) , indicat- 
ing the instruction is not to be assembled 

(L) or it is a comments statement (C) , 
control is transferred to location C825 

(16) to list the card in the object program 
listing (see Common section) . 

If the card does not contain a correct 
ID-Code or is not blank, error flag N is 
placed in the print buffer (15) by subrou- 
tine FERR before control is transferred to 
the print routine (16) (see Common 
section) • 



Common 



L or C, control transfers to location D805 
(05) to prepare for the next intermediate 
text statement. 

If the intermediate text statement is 
none of the above, control is transferred 
to location FH12 (04) . Location C804 (01) 
is changed to a branch to location C805, 
and shared main storage is reset to be used 
as additional output buffers. NBL and NOPB 
are incremented accordingly. 

Shared main storage is the area of main 
storage occupied by the initialization rou- 
tine and the routines necessary to tran- 
slate the START, ICTL, ENTRY, and EXTRN 
Assembler instructions. 

After shared main storage has been 
reset, the program switches that affect the 
processing of each instruction are reset, 
and the current value of the location 
counter is stored in the first location of 
the Symbol Table (05) . 



The program switches reset 
instruction is processed are: 



after each 



SIZE contains the size of the instruc- 
tion, and controls the incrementing 
of the location counter, 

lOCTL contains the trap and operate 
switches for the INOUT subroutine, 

ZBYT is the output byte counter for the 
PRTA subroutine, 

SWPT controls the printing of a line of 
the object program by subroutine 
PRTA, 

RELA is the relocatability attribute 
indicator. 



After the above procedures, or after the 
translation of the instruction is completed 
correctly, subroutine PRTA is entered to 
store the data in the print buffer and to 
list a line of the object progiram (16) . 
The number of columns to be listed, and. the 
contents of each line, are determined by 
the procedure followed before entering this 
subroutine (see Section 3, "Subroutine Des- 
criptions," subroutine PRTA, for detailed 
explanation) . 



After the switches are reset, subroutine 
INOUT is entered to read the next card or 
tape record (06) . Control is then trans- 
ferred to location C811 (07) to start the 
processing of the statement (see General 
section) . 



Machine Instruction Processing 



The location counter is incremented by 
SIZE (number of bytes) of the instruction 
just translated (1 7) . Control is trans- 
ferred to location C804 (01) to set up for 
processing the next intermediate text 
statement. 



If this is a type M CCW, control is 
transferred to location C908 (chart BD) . 

If the location counter is not at an 
even byte (half-word boundary) (18) , con- 
trol is transferred to location C930 (23) . 



Location C804 (01) will contain a trans- 
fer to location FH1 1 (02) until all START, 
ENTRY, EXTRN, and ICTL Assembler instruc- 
tions have been translated. 

The statement just processed is checked 
(02-03), and if it is blank, a START, 
ENTRY, EXTRN, or ICTL, or contains ID-Code 



SIZE, which indicates the number of 
bytes by which to increment the location 
counter, is set to a 1 . Control is trans- 
ferred to subroutine SUZ which zeros the 
output buffer and causes a byte of zeros to 
be printed. Subroutine PCHA is then 
entered to store one byte of zeros in the 
text buffer (24) , and the location counter 
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is incremented by SIZE (25) . Control is 
then transferred to translate the machine 
instruction (19). 

If the location counter is on a half- 
word boundary, or after it is aligned to a 
half-word boundary , a test is made for a 
CNOP instruction (19). If this is a CNOP 
instruction, control is transferred to 
Chart BA to process the instruction. If 
this is not a CNOP, the operation code 
(byte 2 of the Intermediate Text) is placed 
in the output text buffer (20) . A test is 
then made for an ID-Code M machine 
instruction (21) . If the ID-Code is M, 
control is transferred to location F730 in 
subroutine SER to reset the text buffer to 



zeroes. If the ID-Code is not M, the size 
of the instruction (determined by the oper- 
ation code) is stored in SIZE (21) . 



Control is then transferred to translate 
the instruction according to format (22) 
and returns to location C824 (27) to store 
the translated instruction in the punch 
buffer (27) . (See Section 5, "Intermediate 
Text Translation," for error returns from 
the specific instruction translation rou- 
tines.) After the data has been stored in 
the punch buffer, control is transferred to 
location C804 (01) to set up for processing 
the next intermediate text statement (see 
General section) . 
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SECTION 5: INTERMEDIATE TEXT TRANSLATION 



SPACE Translation - Chart BA (Blocks 14-20) 



This section contains the flowcharts 
showing the translation of the operand 
fields of the Intermediate Text developed 
by Phase I. It contains a flowchart for 
each instruction type and format and a 
brief description of the flowchart. 

The reader will require a basic know- 
ledge of the subroutines described in Sec- 
tion 3, "Subroutine Description/* before 
using this section. 



ASSEMBLER INSTRUCTIONS 



CNOP Translation - Chart BA (Blocks 01-07) 



This routine is entered at location C923 

(block 01) from the Phase 2 Control Routine 

(Chart 07). This routine determines what 

action is necessary for the PRTA and PCHA 

subroutines, and processes accordingly. 

Control is returned to location C805 in 
the Phase II Control Routine. 



ICTL Translation - Chart BA (Block 08) 



This routine is entered at location D107 
from the Phase II Control Routine (Chart 
07) . 

If the operand contains a count greater 
than 63, the statement is processed in the 
same way as an EJECT statement with an 
error (see preceding discussion) . 

If the source statement contains an 
error other than the one above, the source 
statement will be printed, and the number 
of blank lines indicated in the operand 
(minus one) will be printed. If the source 
statement does not contain an error, the 
number of blank lines indicated in the 
operand will be printed. 

If the space count plus the count of the 
number of lines already printed on the page 
is equal to or greater than 56, the line 
counter is reset to zero and the statement 
is processed as an EJECT instruction. This 
check is made after each single space; thus 
it is possible to SPACE to the bottom of 
the page and EJECT to the top of the next 
page. 

Control is returned to location C825 in 
the Phase 11 Control Routine. 



The only action required for the ICTL 
Assembler instruction in Phase II is to set 
the print routine control switch, SWPT. 

This translation routine is part of the 
CNOP translation routine. The routine is 
entered at location C926 (block 08) ; it 
sets the SWPT switch, and control is 
returned to location C825 in the Phase II 
Control Routine (Chart 07) . 



EJECT Translation - Chart BA (Blocks 09-13) 

This routine is entered at location D104 
from the Phase II Control Routine (Chart 
07) . 

If the source statement contains an 
error, the source statement is printed 
before the printer EJECT instruction is 
carried out. Otherwise, only the EJECT 
action occurs. 



START Translation - Chart BB (Blocks 01-03) 



This routine is entered at location D002 
(block 01) from the Phase II Control Rou- 
tine (Chart 07) . The location counter is 
set to the translated value of the operand, 
or to zero if the operand is invalid. An 
ESD card image is placed in the output 
buffer, and control is returned to location 
C825 in the Phase II Control Routine. 

If the translation is incorrect, error 
flags are placed in the print buffer, and 
the necessary action, depending upon the 
severity of the error, is taken. 

Control is returned to location C824 in 
the Phase II Control Routine, or the tran- 
slation continues, depending upon the 
severity of the error. 



If tape print option is used, an eject 
control bit causes the next statement writ- 
ten on tape to have an eject action after 
printing. If, however, the no-print option 
is used, the EJECT statement is ignored. 



Control is returned to location C825 
the Phase II Control Routine. 



m 



ENTRY and EXTRN Translation - Chart BB 
(Blocks 04-08) 



This routine is entered at location D001 
(block 04) from the Phase II Control Rou- 
tine. The operand is translated and placed 
into the output buffer area. 
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If the statement is an EXTRN^ an ESD 
card image is placed into the punch buffer, 
and control is returned to location C825 in 
the Phase II Control Routine (Chart 07) . 

If the statement is an ENTRY, the symbol 
in the operand can be used in one ENTRY 
statement only. The ESD card image is 
placed in the punch buffer if the symbol 
has not been used previously. Control is 
returned to location C825 in the Phase II 
Control Routine, 

If the symbol has been previously used, 
this ENTRY statement is ignored, and an 
error flag is placed in the output buffer 
before control is returned to location C825 
in the Phase II Control Routine. 

If the translation is incorrect, error 
flags are placed in the print buffer, and 
the necessary action, depending upon the 
severity of the error, is taken. 

Control is returned to location C824 in 
the Phase II Control Routine, or the tran- 
slation continues, depending upon the 
severity of the error. 



DROP Translation - Chart BB (Blocks 09-13) 



into the Register Table. Control is 
returned to location C825 in the Phase II 
Control Routine. 

If either translation is incorrect, 
error flags are placed in the print buffer, 
and the necessary action, depending upon 
the severity of the error, is taken. 

Control is returned to location C824 in 
the Phase II Control Routine, or the tran- 
slation continues, depending upon the 
severity of the error. 



END, EQU, and ORG Translation - Chart BC 



This routine is entered at location D006 
(block 01) from the Phase II Control Rou- 
tine (Chart 07) . The operand is translated 
and, if valid, placed in the output buffer 
area. 

If the translation is incorrect, error 
flags are placed in the print buffer, and 
the necessary action, depending upon the 
severity of the error, is taken. 

Control returns to location 082*4 in the 
Phase II Control Routine, or the transla- 
tion continues, depending upon the severity 
of the error. 



This routine is entered at location D140 
(block 09) from the Phase II Control Rou- 
tine (Chart 07) . The operand is translated 
and, if valid, the indicated register is 
removed from the Register Table. 

The source statement is listed, and 
control is returned to location 08 04 in the 
Phase II Control Routine. 

If the translation is incorrect, error 
flags are placed in the print buffer, and 
the necessary action, depending upon the 
severity of the error, is taken. 

Control returns to location 0824 in the 
Phase II Control Routine, or the transla- 
tion continues, depending upon the severity 
of the error. 



USING Translation - Chart BB (Blocks 14-24) 



This routine is entered at location D020 
(block 14) from the Phase II Control Rou- 
tine (Chart 07) . The first expression is 
translated and placed in the output buffer 
area. 



If the instruction is an EQU, control is 
returned to location 0825 in the Phase II 
Control Routine. 

The source statement is printed, and the 
output is set to a blank buffer, since an 
ORG or an END instruction is considered to 
be a break in the string of specified 
storage content, and therefore a new output 
card must be started. 

If the statement is an ORG instruction, 
control is returned to location 0804 in the 
Phase II Control Routine. 

If the statement is an END instruction, 
all remaining output buffers are produced; 
the RLD cards are produced from the RLD 
Table (see "Introduction") ; the END card is 
produced; the EOJ message is listed and/or 
displayed; the processing is ended, and the 
program stops. If object output is on 
tape, an LDT record is written, and then 
backspaced over so that it will be over- 
written if this is a stacked assembly. 



DS Translation - Chart BD (Blocks 09-14) 



If the first expression is valid, the 
second expression is translated and, if 
valid, the indicated register is entered 



This routine is entered at location 0915 
(block 09) from the Phase II Control Rou- 
tine (Chart 07) . 
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The location counter is incremented by 
the number of bytes reserved by the DS 
instruction. The output is set to a blank 
buffer, since a DS instruction is consid- 
ered to be a break in the string of 
specified storage content , and therefore a 
new output buffer must be started. 

The source statement is printed, and 
control is returned to location C804 in the 
Phase II Control Routine. 



the type of DC statement. The number of 
zeros necessary to accomplish this are 
placed in the output buffer. 

The location counter is set to be incre- 
mented according to the L (length) field of 
the statement, and one of the following 
procedures is followed. 



DC Type A Instruction; 



The 



operand is 

translated and placed into the output buf- 
fer area. 



CCW Translation - Chart BD (Blocks 02-08) 
and Chart BE (Blocks 15-22) 



This routine is entered at location C908 
(Chart CF, block 02) from the Phase II 
Control Routine (Chart 07) . 

The location counter is aligned to a 
double-word boundary, and the necessary 
zeros are placed in the output buffer. The 
location counter is then set to be incre- 
mented by eight bytes, the size of the CCW 
instruction, since the location counter is 
incremented regardless of errors. 

If the ID-Code is M, indicating the 
instruction is to be assembled as zeros, no 
further processing occurs, and control is 
returned to location C824 in the Phase II 
Control Routine. 

The expressions in the operand are tran- 
slated and placed in the output buffer 
area. The translation of the second 
expression, if valid, will cause an entry 
into the RLD Table (see "Introduction") . 



If the translation is invalid, error 
flags are placed into the print buffer and 
the necessary action, depending upon the 
severity of the error, is taken. 

Control returns to location C824 in the 
Phase II Control Routine, or the transla- 
tion continues, depending upon the severity 
of the error. 

An entry is made into the RLD Table (see 
"Introduction") if the translated operand 
is a three- or four-byte value. Control is 
returned to location C824 in the Phase II 
Control Routine. 

Other DC Instructions; The constant is 
placed in the output buffer area and the 
source statement is listed. The location 
counter is then incremented by the size of 
the L field. A line is printed and the 
location counter is incremented until the 
duplication factor is equal to zero. 

Control is then returned to location 
C804 in the Phase II Control Routine. 



If the translation of any expression is 
incorrect, error flags are placed in the 
print buffer, and the necessary action, 
depending upon the severity of the error, 
is taken. 

Control is returned to location C824 in 
the Phase II Control Routine, or the tran- 
slation continues, depending upon the 
severity of the error. If control is 
returned to the Phase II Control Routine 
because of an error, the remaining expres- 
sions in the statement are not translated. 



DC Translation - Chart BD (Blocks 01, 
03-06) and Chart BE (Blocks 01-14) 



This routine is entered at location C901 
(Chart CF, block 01) from the Phase II 
Control Routine (Chart 07) . 



MACHINE INSTRUCTIONS 



RR Format Translation - Chart BF 



(Blocks 01-08) 



This routine is a continuation of the 
machine-instruction translation portion of 
the Phase II Control Routine starting at 
location C8201 (Chart 07) . 

The operand is translated according to 
the type of RR format (see "Phase I," 
Section 5, Chart AH and description) and 
placed in the output buffer area. Control 
is returned to location CS2^ in the Phase 
II Control Routine. 

If the translation is incorrect, error 
flags are placed in the print buffer, and 
the necessary action, depending upon the 
severity of the error, is taken. 



The location counter is set to be 
aligned to the word boundary detennined by 



Control is returned to location C824 in 
the Phase II Control Routine, or the tran- 
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slation continues, depending upon the 
severity of the error. If control is 
returned to the Phase II Control Routine, 
the remaining terms of the operand are not 
translated. 



RS Format Translation ~ Chart BF 



(Blocks 09-15) 



This routine is a continuation of the 
machine-instruction translation portion of 
the Phase II Control Routine starting at 
location C8201 (Chart 07) • 

The expressions in the operand field are 
translated according to the type of RS 
format (see "Phase I," Section 5, Chart AI 
and description) and placed in the output 
buffer area. Control is returned to loca- 
tion C824 in the Phase II Control Routine. 

If the translation is incorrect, error 
flags are placed in the print buffer, and 
the necessary action, depending upon the 
severity of the error, is taken. 

Control is returned to location C824 in 
the Phase II Control Routine, or the tran- 
slation continues, depending upon the 
severity of the error. If control is 
returned to the Phase II Control Routine, 
the remaining expressions of the operand 
are not translated. 



SI Format Translation - Chart BG 
(Blocks 01-06) 



This routine is a continuation of the 
machine- instruction translation portion of 
the Phase II Control Routine starting at 
location C8201 (Chart 07) . The translation 
of the SI format starts at location FA05 
(block 01) . 



The operand field is translated accord- 
ing to the type of SI format (see "Phase 
I," Section 5, Chart AK and description) 
and placed in the output buffer area. 
Control is returned to location C824 in the 
Phase II Control Routine. 



If the translation of any expression is 
incorrect, error flags are placed in the 
print buffer, and the necessary action, 
depending upon the severity of the error, 
is taken. 



Control is returned to location C824 in 
the Phase II Control Routine, or the tran- 
slation continues, depending upon the 
severity of the error. If control is 
returned to the Phase II Control Routine, 
the remaining expressions in the operand 
field are not translated. 



SS Format Translation - Chart BH 



RX Format Translation - Chart BG 
(Blocks 07-13) 



This routine is a continuation of the 
machine-instruction translation portion of 
the Phase II Control Routine starting at 
location C8201 (Chart 07) . 

The expressions in the operand field are 
translated and placed in the output buffer 
area. Control is returned to location C824 
in the Phase II Control Routine. 



This routine is a continuation of the 
machine-instruction translation portion of 
the Phase II Control Routine starting at 
location C82 01 (Chart 07) . The translation 
of the SS format starts at location FB01 
(block 01) . 

The operand field is translated accord- 
ing to the type of SS format (see "Phase 
I," Section 5, Chart AL and description) 
and placed in the output buffer area. 
Control is returned to location C824 in the 
Phase II Control Routine. 



If the translation of any expression is 
incorrect, error flags are placed in the 
print buffer, and the necessary action, 
depending upon the severity of the error, 
is taken. 



If the translation of any expression is 
incorrect, error flags are placed in the 
print buffer, and the necessary action, 
depending upon the severity of the error, 
is taken. 



Control is returned to location C82'* in 
the Phase II Control Routine, or the tran- 
slation continues, depending upon the 
severity of the error. If control is 
returned to the Phase II Control Routine, 
the remaining expressions of the operand 
are not translated. 



Control is returned to location C824 in 
the Phase II Control Routine, or the tran- 
slation continues, depending upon the 
severity of the error. If control is 
returned to the Phase II Control Routine, 
the remaining expressions in the operand 
field are not translated. 
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♦06 * 
» A2* 



****»fi,2** ******** 

* * 
*LCAO PSW'S AND « 
» CLEAR CAW AND « 
« PRINT BUFFERS » 

* « 
***************** 



THERE 
A PRINTER 
ON LINE . 



YES .* IS IT 
...»TYPE 'C OR 
*.0R BLANK 



***** 
*C8 * 
* 01* 



X 02 

******B2** ********* 

WRITE AND 

* REWIND SYSLIB * 

TAPE. IF 

* REQUESTED * 

************* 



*****C1 ********** 
« * 

* MODIFY I/O » 

» PARAMETERS TO *X. 

* READ TAPE * 
» » 
***************** 



* REWIND *. 

* I TXT * 

* TAPE * 
«*******»*»*»***« 



!(««««£ 1 »***»*»*»* 

* * 

* STORE * 

* DATA IN *X 

* SYMBOL TABLE * 

* * 
***************** 



* READ 

» INTERMEDIATE 

*TEXT STATEMENT 

»«***«**»**«»«** 



SYMBOL 

TABLE 

*.CARD . 



09.2 X 09 

*****f I**** ****** *«»*«F2»********* 

* * « STORE * 
♦MODIFY PROGRAM * *INTERPHASE BYTE* 
*IF NO PUNCH SW *X *{TCD). SBT •*• * 

* IS ON « * LENGTH =6 * 

* * * * 
*«*«*»»»»»* ««»«»« »««»**»*****»*«** 

13 .X. 

**«»*G 1********** G2 *. 09.1 

* * •* * . 

« MODIFY I/O * YES .« IS IT A ». 

* PARAMETERS TO *X *. CARD OUTPUT .* 

* PUNCH CARDS * «. SYSTEM .* 

* * *• •* 
**«*****»»***»*** *, ,* 

* NO 



**«**H2* ******** 
« 

* MODIFY I/O 

* PARAMETERS TO 
» WRITE TAPE 



* EJECT 'END* 
» CARD IF 

* 1442 PUNCH 
************** 



*****j I********** 

* * 

* SET * 

* NO-PRINT *X 

* SWITCH « 

* « 
***************** 



IS IT 
A 1052 
PRINTER 



EJECT PAPER 
************** 



* D3 *.X 



»-*—*—*— 



* LIST HEADING * 
****»*»****«*«**» 



**»«»F3********** 
*MOOIFY PROGRAM * 

* TO HANDLE * 
.X*«EJECT' PSEUDO * 

* OP'S AS A » 



IS A 

LISTING 

.REQUESTED. 



» OFF 

LINE PRINT 
*. SWITCH . 



**»«*K3********** 

* * 
*MODIFY PROGRAM * 

* FOR OFF LINE * 

* PRINTING * 

* * 



«*B4******* 

* IS » 

THERE A 

TYPEWRITER 

ON LINE 



**«**C4********** 



INHIBIT 

ALL 

PRINTING 



»*D4»* ******** 

RESET * 

REGISTER * 

TABLE AND * 

LOC. CTR. » 

* 



**»««E4********** 
♦DETERMINE SIZE * 
*0F OUTPUT BFRS * 
*SET UP MIN. OF * 
*30 RLD BUFFERS * 
♦PER 8K OF CORE * 
♦*♦♦♦♦*♦*♦♦♦♦♦♦♦♦ 



*****f^* ********* 
* BUMP COUNT OF * 
♦RLD BUFFERS BY * 
*SIZE OF CORE IN* 
♦GAP BETWEEN RLD* 
*TBL AND OPT BFR* 
♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦ 



♦♦♦♦«G4*^******* 

♦ RESET 

♦ RLD 

♦ TABLE 
♦ 
♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦ 



♦♦♦♦♦H4*^^^**«*** 
» MODIFY I/O * 
*PARAMETERS FOR » 

* CORRECT PRINT * 

* FORMAT * 

*♦♦♦♦♦♦*♦*♦♦♦♦♦** 



***^J4*^ ♦♦♦♦*♦♦♦ 

SET ♦ 

DUMMY 'START' * 

FORMAT IN ♦ 

FIRST OUTPUT * 

BUFFER 



YES 


• * 


A START, 




.EXTRN, ENTRY 




♦ 


OR ICTL 








X 




*. .* 


♦ ♦♦♦♦ 




* NO 


♦ C8 ♦ 






♦ Dl^ 






♦ * 






* 







♦♦♦♦♦♦ 



:♦♦♦** 



**^^*K4*^^^^^^^** 

♦ ♦ 

* RESET ♦ 
♦INITIALIZATION » 

* ROUTINES * 

♦ ♦ 
♦♦♦♦♦♦♦«♦♦♦♦♦♦♦♦♦ 



♦♦♦♦♦05 ♦♦♦♦♦♦♦♦** 

♦ ♦ 

♦ RESET ♦ 

♦ . REST OF ♦ 

♦ SHARED CORE * 

♦ ♦ 
♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦ 



♦ ♦♦♦ 



fE5^ 



♦ BUMP COUNT OF * 
♦NO. OF BUFFERS * 

♦ BY SIZE OF ♦ 

♦ SHARED CORE ♦ 
♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦ 
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« Al* 




«««« * * 




» » 




Al *.X. 




* . 




««*» , 




.X. 




Al * 




.* IS 


« 


.* THIS A 




. BRANCH 


TO 


*. C805 





.BLANK, TYPE C.». 



.* IS IT ». 
.* A START, *. YES 
*.EXTRN, ENTRY, .»..X 
*. OR ICTL .* 



FH12 X 04 

««*««D !«««*«»««»« 
*SET C804 TO BRN* 
* BUMP NBL AND * 
*NCPB BY SIZE OF* 
♦SHARED CORE RE-* 
*SET SHARED CORE* 
***************** 



cao5 X 05 

*««««E I********** 

* RESET PROGRAM * 
♦SWITCHES. STORE* 

* CURRENT VALUE * 
»0F LOC. CTR. IN* 

* SYMBOL TABLE * 



* READ * 

* INTERMEDIATE * 
» TEXT * 



OUTPUT 

BUFFER 

FULL 



* PRODUCE * 

* AN OBJECT * 

* CARD * 
***************** 



Ce27 

» ENTER CORRECT ASSEMBLER TRANS. » 

* ROUTINE BY CHECKING BYTE 2 OF * 
...X* INTERMEDIATE TEXT. RETURN DE- * 

* PENDS UPON INSTRUCTION TYPE. * 
********************************** 

* INSTR. . LOC. ** INSTR. . LOC. * 



ccw 


. BDB2 


,** 


EQU 


. BCBl 


* 


CNOP 


. 07C4 


** 


EXTRN 


. BBB2 


* 


DC 


. BDBl 


** 


ICTL 


. BAC2 


* 


DROP 


. BBGl 


** 


ORG 


. BCBl 


* 


DS 


. BDB4 


** 


SPACE 


. BAB5 


* 


EJECT 


. BAB4 


** 


START 


. BBBl 


* 


END 


. BCBl 


** 
,** 


USING 


. BBE4 


* 



»«*««»»««««»«««»«# 



***** 
*BA * 
* Bl* 



E2 ». 

« * 
IS 

ID-CODE 



-»-»-«-«-«-» 



************* 

**** 

* * 
*07 * 

* G2* 

C825 X 16 
«««««G2** ******** 
«FRTA 



«— « — 



-«-«-« 



* STORE DATA IN * 
» PRINT BUFFER * 

* AND LIST LINE « 



*****H2* ********* 

* * 

* INCREMENT * 

* LOC. CTR. BY * 

* 'SIZE* * 
« « 



* Al * 

* * 
**** 



*****Ei^* ********* 

* * 

* STORE * 

* OP CODE IN » 

* TEXT BUFFER * 

* * 
***************** 



.*. ID CODE M 



C930 X 23 
*»««* 05 ********** 
*SET 'SIZE' TO 1* 

* LIST A BYTE * 

* OF ZEROS » 
*SET TEXT BUFFER* 

* TO ZERO * 



STORE DATA 



»««»*F5»********* 

* * 

* INCREMENT * 
.* LOC. CTR. BY * 

* 'SIZE* * 

* * 
***************** 



C824 X 27 
»»»»*H3********** 
*PCHA » 

*-*-*-*-*-*-*-*-* 



STORE DATA 



«*«««G4** ******** 
« * 

* SET 'SIZE' * 

* TO SIZE OF * 

* INSTRUCTION * 

* » 



TRANSLATE * 
OPERANDS * 



RR . BFBl 
RS . BFB4 
RX . BGB4 
SI . BGB2 
SS . BHB3 
************** 



********************************* 



* ALL REFERENCES TO PRTA » 

* APPLY TO ON-LINE PRINT- » 

* ING AND TO WRITING TAPE * 

* FOR OFF-LINE PRINTING * 

* * 
********************************* 
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»BA * 
* Bl* 



*BA « 
* C2* 



«BA * 

* B4-» 

« * 



***** 
*BA » 
* B5* 



«»«««B 1********** 



« SET 'SIZE* * 

♦ EQUAL. TO BYTES « 

* SKIPPED * 



.» SPACE *. 

.COUNT GREATER. 

*. THAN 63 .* 



» DOES * 
•SIZE' EQUAL 
». ZERO .* 



C926 X 08 
*****C2** ******** 

* SET PRINT * 
» ROUTINE TO * 

...X* PRINT SOURCE * 

* STATEMENT * 
« * 
***************** 



*—»—*—*—«— 



****** 



PRINT * 

ERROR » 

STATEMENT » 

»»»*♦» 



C9271 X 03 
«»««»[) l«j( ««««»»«« 
*LOAD 'NOP* INTO* 

* TEXT BUFFER. » 

* SAVE ORIGINAL * 
«SIZE. SET SIZE » 
*EQUAL TO ZERO. « 
***************** 



»07 * 
» G2* 



* SET * 
.X*SWITCH TO EJECT* 

* PRINTER * 

* * 
***************** 



* PRINT * 

* SOURCE * 
» STATEMENT * 
***************** 



SEE NOTE 2 X 12 
*****EA** ******** 
*INOUT » 

*-*-*-*-*-*-*-*-* 
* EJECT PRINTER * 



»»*«»**** 



» 

* SET TO 

* LIST ERROR 

* STATEMENT 



STORE DATA 



X 06 
»«««»G1 ********** 

* SET TO PRINT » 
*120 COLS. INCR.* 

* LOG. CTR. AND * 
*REDUCE ORIGINAL* 

* SIZE BY 2 » 



» * 

* CLEAR * 

* EJECT PRINTER * 

* SWITCH * 

* * 
***************** 



«»»»«F5********** 
» * 

* RESET PRINT * 
K* BUFFER * 

* TO BLANKS * 

* * 
***************** 

**** , 

* * • 

* G5 *.X. 

* * .X 



* LIST » 

* ERROR OR * 

* BLANKS * 



NO .* ORIGINAL 
. ..*. SIZE EQUAL 
». ZERO 



.« SPACE *. 
YES .*COUNT PLUS 
...*. LINE COUNT 
*.GRTR THAN. 



IF NO PRINT OPTION 
IS USED. BRANCH TO 
804(07-Al ) 



IF OFF-LINE PRINTING. 
SET THE CARRIAGE 
CONTROL BYTE OF THE 
PRINT BUFFER TO 
•EJECT*. THIS 
CAUSES THE NEXT 
STATEMENT WRITTEN 
ON TAPE TO HAVE 
AN EJECT ACTION 
AFTER PRINTING 



**** 

* * 

* G5 *X. 

* * 



***** 
*07 * 
* El* 



Chart BA. SPACE, EJECT, CNOP, and ICTL Translation 
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» ERROR EXITS FOR SUBROUTINE SER 
* ******************** #it*****int» 



y******* 



***** 
»BB * 

* B2« 



UNDEFINED 

SYMBOL 
««««««««« 



TRANSLATED VALUE 
TOO LARGE 



0002 X 01 
«««««B 1 »»*»*«**»* 
*SER * 

*-*-*-* -*-*-*^*^* 
♦TRANSLATE OPER-* 
» AND. ERROR « 
♦EXITS B4 AND B5* 



DOOl X 04 

»««««B2»***»**««» PARAMETERS FOR 
»SER * BOTH ROUTINES 



♦TRANSLATE OPER-* 
* AND. ERROR « 
♦EXITS 84 AND B5^ 



C0L=05 
LGH=00 
TXT=00 
NBT=04 



♦ SET ♦ 

♦ ERROR FLAGS ♦ 

♦ U AND N ♦ 

♦ (SEE NOTE) ♦ 
«««**♦«♦*»»«*»»** 



F744 X 26 
*»»«»B5^ ♦♦♦♦♦♦♦♦♦ 
♦SET ERROR FLAG ♦ 
» T ♦ 
♦TRUNCATE VALUE ♦ 

♦ BEFORE ♦ 

♦ STORING ♦ 
***************** 



X 02 
«««««C1 ♦♦♦♦♦♦♦♦♦♦ 

♦ SET LOC. CTR. ♦ 

♦ TO NEW VALUE. ♦ 
♦ALIGN BOUNDARY ♦ 

♦ AND ADD BYTES ♦ 

♦ TO LOC. CTR. ♦ 
***************** 



NOTE 

NO N FLAG SET ON 

UNDEFINED START 



♦ RETURN TO ♦ 

♦ CALLING ♦ 

♦ ROUTINE ♦ 
»»»»*«*♦»*«»*»* 



«»«*»«««««»«»»«»«««»«««««*««»«««»«««»«»•»»«««»«««*««« 



D0053 X 03 
*****Q I ********** 

♦ SET UP ♦ 

♦ PUNCH BUFFER ♦ 

♦ TO PRODUCE ♦ 

♦ ESD CARD ♦ 
« * 



♦ ENTRY ♦ 

SYMBOL USED 
♦. BEFORE .♦ 



*—*—*—*—*—*—*—*—* 
X* SET ♦ 

♦ ERROR ♦ 

♦ FLAG ♦ 
»»*»»»«*»*»»**«»♦ 



***** 

♦ BB ♦ 

♦ E4^ 



***** 

♦ 07 ♦ 

♦ G2^ 



X 07 
«««««E2^^ ♦♦♦♦♦♦♦♦ 

♦ TURN SYMBOL ♦ 

♦ USED ♦ 
.♦ INDICATOR ON ♦ 

♦ FOR ♦ 

♦ THIS SYMBOL ♦ 



***** 

♦ 07 ♦ 

♦ G2^ 



»E4^^^^^^^^^^ EER PARAMETERS 



♦TRANSLATE OPER-^ 

♦ AND. SEE NOTE ♦ 

♦ ON CHART BC ♦ 
***************** 



C0L=05 
LGH=06 
TXT=00 
NBT=04 



*************************** 



***************************************** 



***** 
»BB ♦ 
♦ Gl^ 



D140 X 09 
»«»««G1^^ ♦♦♦♦♦♦♦♦ 

♦ SER ♦ 

♦ GET REGISTER ♦ 

♦ NUMBER. ERROR ♦ 
♦EXITS B4 AND B5^ 
***************** 



X 15 

*****F4********** 

**** ♦CVTL ♦ 

♦ ♦ YES^-^-^-^-^-^-^-^-^ 

♦ H2 ♦X....^ IS VALUE ♦ 
« * » TOO ♦ 

♦♦♦♦ ♦ LARGE ♦ 
***************** 
.NO 



SER PARAMETERS 

C0L=17 
LGH=01 
TXT=00 
NBT=04 



D0223 24 

*****Q3********** 
♦FERR ♦ 



♦ SET 

♦ ERROR 

♦ FLAGS 



♦X ♦VALUE ABSOLUTE ♦. 



SER PARAMETERS 

C0L=17 
LGH=06 
TXT=00 
NBT=04 



X^ GET REGISTER ♦ 
♦ NUMBER. ERROR ♦ 
♦EXITS B4 AND B5^ 



CVTL X 10 
«««««|-| !♦♦♦♦♦♦♦♦♦♦ 
♦CVTL ♦ 

«-«-«-»-»-*-»-*^»N0 

♦ IS VALUE ♦... 

♦ 15 OR ♦ 

♦ LESS ♦ 
***************** 

.YES 



^*— *—*-*— * 



SET 
ERROR 
FLAGS 



CVTL X 18 
«»»»«H5 ♦♦♦♦♦♦♦♦♦♦ 
♦CVTL ♦ 

f^Q« — «-.«-« — «— » — « — «_« 

... .♦ IS VALUE ♦ 

♦ 15 OR ♦ 

♦ LESS ♦ 
***************** 

.YES 



♦REMOVE REGISTERS 
♦ FROM ♦ 
♦REGISTER TABLE ♦ 
***************** 



*****j 3*** ******* 

♦ * 

♦ SET VALUE ♦ 

♦ TO ♦ 

♦ ZERO ♦ 

♦ * 
***************** 



.♦ IS REG- ♦ 
. ISTER NUMBER 
♦. ZERO .♦ 



♦ LIST ♦ 

♦ SOURCE ♦ 

♦ STATEMENT ♦ 
***************** 



♦ SET ♦. 

♦ ERROR ♦ 

♦ FLAG ♦ 



♦PLACE REGISTER ♦ 
X^ NUMBER INTO ♦ 
♦REGISTER TABLE ♦ 
* * 

***************** 



***** 

♦ 07 ♦ 

♦ Al^ 



***** 
♦07 ♦ 
♦ G2^ 
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***** 
*BC * 
« Bl* 



« ERROR EXITS FOR SUBROUTINE EER » 

* ****************************** * 



INDICATED MULTIPLY OF NON- 
ABSOLUTE TERMS OR TOO MANY 
MINUS SIGNS 



TRANSLATED VALUE 
TOO LARGE 



0006 X 01 
»»»«»B 1 ««»«»****« 
*EER « 

* TRANSLATE « 

* OPERAND AND « 
« STORE « 
***************** 



NOTE 

ERROR EXITS FOR SUBROUTINE ERR 

ARE THE SAME AS FOR SUBROUTINE 

SER (SEE CHART BB) PLUS THE 

ERROR EXITS B4 AND B5 ON THIS 

PAGE. 

EER PARAMETERS 

C0L=05 
L6H=00 
TXT=00 
NBT=04 



* SET RELA=0 TO • 

♦INDICATE VALUE « 

» AS ABSOLUTE * 

» # 



****Cii********* 

* REtURN TO » 
« CALLING * 

* ROUTINE * 



F746 X 14 
*****B5*** ******* 
*FERR » 



«««««««»«««««»««» 



*****C5** ******** 

* * 

* STORE * 
♦TRUNCATED VALUE* 

* IN OUTPUT » 
» » 



♦SET ERROR FLAG ♦ 
♦T AND SET SAVE ♦ 
♦ AREA TO ZERO ♦ 
« * 

***************** 



*********************************************** 



E ABSOLUTE ♦.... 


....X^. THIS AN .♦... 




.♦ X ♦. EQU .♦ 


X 


• •♦ • 


♦ . •♦ 




*• •« • 


♦ . .♦ 


♦07 ♦ 


♦ YES 


♦ NO 


♦ G2^ 




««»« . 






« ♦ , 






♦ F2 ♦.X. 












**** , 




.X. 


DOlOl X 09 




Fl ♦.05 


»«**«F2^ ♦♦♦♦♦♦♦♦♦ 




♦. < 


♦PRTA ♦ 




IS ♦. NO . 


»_•)(_«_*_»_«_»_*_* 




THIS AN ...... 


♦ LIST ♦ 




END .♦ 


♦ SOURCE ♦ 




. .♦ 


♦ STATEMENT ♦ 




♦ . .♦ 







.♦ IS END ♦. 
.OPERAND FIELD. 
♦. BLANK .♦ 



*-*—*—*—*— 



-»-«—»—»—*—» 



♦ SET ♦ 

♦ ERROR ♦ 

♦ FLAG ♦ 



♦ SKIP TO BLANK 

♦ OUTPUT BUFFER 

♦ IF NECESSARY 
**************** 



X 12 

♦PUNCH REMAINING^ 
♦OUTPUT BUFFERS ♦ 

♦ INTO TEXT ♦. 

♦ RECORDS ♦ 
« « 



***** 

♦ BA ♦ 

♦ G2^ 
* * 



FCOl 13 

*****J3********** 
♦PUNCH RLD CARDS^ 
♦FROM RLD TABLE ♦ 
. ..X^ AND PRODUCE ♦. 
♦ END CARD ♦ 



***************** 



*****JS ********** 

♦ WRITE ♦ 

♦ LDT RECORD ♦ 
K* AND * 

♦ BACKSPACE ♦ 

♦ OVER IT ♦ 
***************** 



Chart BC. END, EQU, and ORG Translation 



X 14 
****\(,^** ******* 

* LIST AND/OR ♦ 

* DISPLAY EOJ ♦ 
♦MESSAGE AND HLT* 

*************** 
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«B0 * 
* B4» 



C901 X 01 

*BA * 

* SET "SIZE* * 

* EQUAL. TO BYTES » 

* SKIPPED * 



C908 X 02 

*****B2** ******** 

* SET 'SIZE* « 

* ACCORDING TO » 
« LAST 3 BITS » 

* OF LOCATION * 

* COUNTER * 
***************** 



*****B4**»»****»« 
*BA * 

*-*-*-*-*^* -*-*-* 

* SET 'SIZE' * 
*EQUAL TO BYTES * 

* SKIPPED * 
***************** 



* SET ZEROS IN * 
« TEXT BUFFER « 

* AND LIST « 
***************** 



*-»-»-»- 



STORE DATA 



* IS 


*. YES 


SIZE* EQUAL 


T0».... 


*. ZERO 


* • 


*. .* 




*• •* 




* NO 




X 


11 I 






* . 


INCREMENT 


* • 


LOCATION CTR. * 


BY 'SIZE' 


* . 




* • 






X... . 





*****E^** ******** 



*—*—»—»— 



-»-«-«-« 



* BLANK OUTPUT * 

* BUFFER * 



.IS THIS A CCW. 



,* ***** 

,» »BE * 

YES * Bl* 



*************** 



* SOURCE * 

* STATEMENT » 



* * 

* INCREMENT * 

* LOC. CTR. BY * 
*SIZE OF OPERAND* 

* * 



»07 * 
* Al* 



***** 
»07 * 
» H3» 

» * 



*BE * 

* B4« 

* * 
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««««««»««««*«««»«««««««»»«««»«««««« 



««««« 
»BE « 
* Bl* 



FOR ERROR EXITS FROM 
SUBROUTINE SER. REFER 
TO CHART BB. 
2 
FOR ERROR EXITS FROM 
SUBROUTINE EER. REFER 
TO CHART BC. 



***** 
*BE » 
» B4* 



« « 

* SET 'SIZE' * 
» ACCORDING TO * 

* L FIELD » 
« * 
***************** 



**************************************** 



* TRANSLATE * 

* FIRST TERM * 

* (SEE NOTE 1) » 



C0L=3 
LGH=2 
TXT=7 

NBT=2 



.IS THIS A DCA.*. 



10 

» SET TO REPEAT « 
» ACCORDING TO * 
X* DUPLICATION * 
» FACTOR. STORE * 
♦CONSTANT IN TXT* 



-*-♦-»-* 



TRANSLATE 
THIRD TERM 
(SEE NOTE 1 ) 



C0L=21 
LGH=02 
TXT=39 
NBT=02 



F502 X 03 

»»*«»D1»*»*»»**»* PARAMETERS 
»EER * 

*-*-*-*-*-*-*-*-* C0L=9 

* TRANSLATE * LGH=2*L 

* OPERAND « TXT=8L-1 
« (SEE NOTE 2) « NBT=4 
***************** 



* STORE DATA 



* ARE * 

UNUSED MASK 
*.BITS ZERO.* 



*—*—*—*—*—*—*—*—* 
K* SET * 

* ERROR * 

* FLAG * 



DOES RELA=0 .* 



.* SET * 

» ERROR * 

* FLAG « 



* HI * 
« * 



*TABL 


z CONTAI^ 
BLANK . 


A*.... 
* . 




-» 

*. .* 
* NO 






X 


08 ! 


***** 


Jl««««««»*«« « 


*FERR 




» . 








* 


SET 


* . 


* 


ERROR 


* . 




FLAG 







X 09 
«»«««K 1********** 
» SET NECESSARY * 

* INFORMATION * 

* INTO * 

* RLO TABLE « 

* ENTRY * 



.F5172 X 12 
*****E3* ********* 
*PRTA * 

* LIST * 

* SOURCE » 

* STATEMENT * 
***************** 



X 13 
««»*«F3********** 
♦INCREMENT LOC. * 
»CTR. BY 'SIZE* « 

* AND REDUCE * 

* DUPLICATION » 

* FACTOR * 
***************** 



* DOES * 

DUPLICATION 
».FACTOR=0 .* 



TRANSLATE * 

FOURTH TERM * 

(SEE NOTE 1 ) * 

**************** 



C0L=17 
LGH=06 
TXT=63 
NBT=04 



X 19 
»»»»»F4********** PARAMETERS 
*EER * 

*-«-»-»-«-»-»-«-* C0L=05 

* TRANSLATE * LGH=06 

* SECOND TERM * TXT=31 

* (SEE NOTE 2) * NBT=04 
***************** 



.* SECOND *. N 
.TERM ABSOLUTE.*. 
*.(RELA=0) .» 



...X* HI 
* 
**** 



* SET * 

* ERROR * 

* FLAG * 
***************** 



****J^^********** 



ZERO 

TEXT 

BUFFER 



*»**»««» 



******** 



***** 
*07 * 
* H3* 



.X. 
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***** 
»BF » 
* Bl* 



» NOTE 1 * 

* FOR ERROR EXITS FROM * 

* SUBROUTINE SER. REFER * 
TO CHART BE. * 



* NOTE 2 



FOR ERROR EXITS FROM * 
SUBROUTINE EER, REFER * 
TO CHART BC. * 



«««««««»«««««««»« 



*BF * 
* B4* 



FA05 08 

*****BZ********** PARAMETERS 

*SER 



X» TRANSLATE * 
« I FIELD * 
« (SEE NOTE 1 ) « 
***************** 



COL=03 
LGH=02 
TXT=15 
NBT=02 



X 09 

*****B4*****«***» PARAMETERS 
*SER * 

*-*-*-*-*-*-*-*-* COL=03 

* TRANSLATE * LGH=01 

* R3 FIELD * TXT=15 

* (SEE NOTE 1) » NBT=02 



TRANSLATE * 

R2 FIELD « 

(SEE NOTE 1) * 



PARAMETERS 

C0L=03 
LGH=01 
TXT=15 
NBT=02 



IS RELA=0 .* 



IS RELA=0 



»D4»»»*»**«** PARAMETERS 



* TRANSLATE * 
» Rl FIELD « 

* (SEE NOTE 1) * 



C0L=05 
LGH=01 
TXT=1 1 
NBT=02 



X 04 
*****E.l********** PARAMETERS 
*SER * 

*-*-*~*-*-*~*-*-* C0L=05 

* TRANSLATE * LGH=01 

* Rl FIELD * TXT=11 

* (SEE NOTE 1) » NBT=02 
***************** 



IS RELA=0 



Fl *. 

.* «. 

• * 
*. IS RELA=G 



TRANSLATE * 
D2(B2) FIELD * 
(SEE NOTE 2) * 



C0L=07 
LGH=03 
TXT=31 
NBT=02 



FA121 X 06 
»»«#*G1 **»**#»*♦« 
*FERR * 

*-*-*-*-*-*-*-*-* 

* SET * 
» ERROR * 

* FLAG * 
***************** 

**** , 

«BF ».X. 

* HI* 
**** , 

F730 X 07 
«««««H !»««»«««««« 
» STORE ZERO * 
*IN TEXT BUFFER * 
» EXCEPT » 
» FOR OPERATION * 

* CODE » 
***************** 



«»«»*H4* **»**»**» 
*FERR * 

*-*-*-*-*-*-*-*-* 
X* SET * 
» ERROR * 
* FLAG » 
***************** 



»07 * 
* H3* 



F730 X 15 
*****jit.** ******** 

* STORE ZERO » 
*IN TEXT BUFFER » 
» EXCEPT *. 

* FOR OPERATION * 

* CODE * 
***************** 
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*BG * 
» B2« 



.* LPSW, 
.SSM.HIO.SIO, 
«. TIO.TCH . 



»****B4****»***»* PARAMETERS 



» TRANSLATE * 

* X2 FIELD * 

* (SEE NOTE 1) * 
***************** 



C0L=03 
LGH=0 1 
TXT=15 
NBT=02 



PARAMETERS 

CCL=03 
LGH=02 
TXT=15 
NBT=04 



« TRANSLATE » 

* I FIELD « 

* (SEE NOTE 1 ) * 



IS RELA=0 



D2 «. 
, « * , 

IS RELA=0 



* TRANSLATE * 
» Rl FIELD * 

* (SEE NOTE 1) » 
***************** 



PARAMETERS 

C0L=05 
LGH=01 
TXT=1 1 

NBT=02 



.X 

.FA22 X 04 

*****E2********** PARAMETERS 
*EER « 

»-«-«-«-»-.»-»-»-* C0L = 07 

« TRANSLATE * LGH=03 

* Dl(Bl) FIELD * TXT=31 

« (SEE NOTE 2) « NBT=02 
***************** 



IS RELA=0 



***** 
*07 * 
* H3* 



.FA22 X 11 

»EER * 

» TRANSLATE » 
» D2(B2) FIELD * 
* (SEE NOTE 2) * 
***************** 



PARAMETERS 

C0L=07 
LGH=03 
TXT=31 
NBT=02 



.FA121 

*****Q2^ 
*FERR 



********* 



* SET 
» ERROR 

* FLAG 



F730 X 06 
««««»H2** ******** 

* STORE ZERO * 
*IN TEXT BUFFER * 

* EXCEPT *. 
» FOR OPERATION * 
» CODE * 



.FA121 12 

«*«««H4********** 
»FERR * 

X* SET » 
« ERROR * 
« FLAG * 
***************** 



******************************* 

* * 

* NOTE 1 * 
« FOR ERROR EXITS FROM * 

* SUBROUTINE SER. REFER » 
« TO CHART BB. * 
» NOTE 2 * 
« FOR ERROR EXITS FROM • 

* SUBROUTINE EERt REFER ♦ 

* TO CHART BC. * 
« « 



F730 X 13 
*****j^** ******** 
» STORE ZERO * 
«IN TEXT BUFFER * 
« EXCEPT *. 
« FOR OPERATION * 
» CODE * 
***************** 
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*BH * 
* B3» 



m* a 


FECI .X. 


B2 «. 2 


B3 *. 


.« «« 


• * 


.* IS ». 


YES .* PACKt 


. DATA IN LI .*X.. 


*, UNPK.MVO 


«. FIELD .» 


*. DECIMAL 



»«C4* ********* 



—«—«_«_« 



* TRANSLATE * 

* LI FIELD * 
*(£EE NOTE 1 •! A)* 



IS RELA=0 



—*—*—»—»- 



* 03 * 



«»«»»E 1********** 

* « 

* STORE LI * 

* FIELD IN * 

* TEXT BUFFER * 

* « 



*IS Dl A SYMBOL 



«««««02* ********* 
» * 

* ZERO TEXT AND * 
.*PLACE ABSOLUTE * 
*VALUE IN BUFFER* 
« » 



12 
***»*E2********** 

* PLACE LENGTH * 

* ATTRIBUTE * 

* FROM SYMBOL *X 
*TABLE IN BUFFER* 

* * 
***************** 



* » 

* D3 * 

* * 
**** 



FA121 X 24 
*****03*** ******* 
*FERR * 

* . SET *X 

* ERROR * 

* FLAG * 
***************** 



F730 X 25 
*»«»*E3»«***»*»»» 

* STORE ZERO * 
*IN TEXT BUFFER * 

* EXCEPT * 

* FOR OPERATION » 

* CODE * 
***************** 



* TRANSLATE * 

* L FIELD * 
*(SEE NOTE I.IO* 



IS RELA=0 



* IS *. NO .* *. YES 

DATA IN L2 .* X*IS D2 A SYMBOL *... 

*. FIELD .* *. .* 



*««»«G2********** 



* TRANSLATE * 

* L2 FIELD * 
*(£EE NOTE lilB)* 



...» 




IS RELA=0 


, 


* 








*. .* 


X 




* • •* 


»»«« 




* YES 


* 






D3 * 






* 






**** 







*****J I********** 

* * 

* STORE L2 * 

* FIELD IN * 

* TEXT BUFFER * 

* « 



* ZERO TEXT AND * 

.*PLACE ABSOLUTE * 

*VALUE IN BUFFER* 

» « 



«««««H2** ******** 

* PLACE LENGTH * 

* ATTRIBUTE * 

* FROM SYMBOL *X 
*TABLE IN BUFFER* 

* * 
***************** 



**** 

* * 

* F5 * 

* * 



**»««D5********** 

* * 

* ZERO TEXT AND * 
. *PLACE ABSOLUTE * 

*VALUE IN BUFFER* 

* * 



21 
»*»»*E5 **«»»»»*** 

* PLACE LENGTH » 

* ATTRIBUTE * 

* FROM SYMBOL *X 
*TABLE IN BUFFER* 



»*»» 



h»»« 



t***»« 



FB26 X 22 
•)t»«*»F5********** 
*EER * 



X* TRANSLATE * 
* D2(B2) FIELD * 
*(SEE NOTE 2,2A)« 



FA22 X 23 
»»**#G5 ********** 
*EER * 

*-*-*-*-*-*-*-*-* 

* TRANSLATE * 

* Dl (Bl ) FIELD * 
*(SEE NOTE 2,2B)* 



***** 
*07 * 
» H3* 



*************** 
NOTE 1 



***************** 



FOR ERROR EXITS FROM * 

* SUBROUTINE SER . REFER * 

* TO CHART BB. * 

* NOTE lA * 

* PARAMETERS FOR LI FIELD * 

* C0L=05 TXT=11 * 

* LGH=11 NBT=02 * 
« NOTE IB * 

* PARAMETERS FOR L2 FIELD * 

* C0L=03 TXT=15 * 

* LGH=01 NBT=02 * 
« NOTE IC * 

* PARAMETERS FOR L FIELD * 

* C0L=03 TXT=15 * 

* LGH=02 NBT=02 * 

* * 
********************************** 



***************************** 


NOTE 


2 




FOR ERROR EXITS FROM 




SUBROUTINE EER. REFER 




TO CHART BC. 


NOTE 


2A 




PARAMETERS FOR D2(B2) 




FIELD 




C0L=15 TXT=14 




LGH=03 NBT=02 


NOTE 


2B 




PARAMETERS FOR 01 (Bl) 




FIELD 




COL=07 TXT=31 




LGH=03 NBT=02 


***************************** 
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APPENDIX A: AUTOCHART CROSS-REFERENCE TABLES 



This appendix contains three cross- TABLE I: LABELS 
reference tables which may be used with the 

Autochart diagrams within this manual. Use This table lists all labels that appear 

of the tables will enable a user to locate on charts. To the right of each label is 

any label appearing on any chart, all the grid location and the block number 

references to a particular entry connector, associated with the block that bears that 



and all blocks where a subroutine is used. 



label. 



BLOCK 
LABEL 


BLOCK 
LOC 


BLOCK 
NUMBER 


ccw 


AAB2 


AAOl 


CNOP 


ACBl 


ACOl 


CVTL 


BBHl 
BBH5 


BBIO 
BB18 


C311 


4B5 


0420 


C804 


07A1 


0701 


C805 


07E1 


0705 


C811 


07G1 


0707 


C819 


07A2 


0710 


C8201 


07C4 


0718 


C824 


7H3 


0727 


C825 


7G2 


0716 


C901 


3DB1 


BDOl 


C903 


BDCl 


BD03 


C908 


BDB2 


BD02 


C910 


BDFl 


BD06 


C9101 


3DG1 


BD07 


C915 


BDB4 


BD09 


C9192 


BDE4 


BD12 


C923 


BABl 


BAOl 


C926 


BAC2 


BA08 


C9271 


BADl 


BA03 


C930 


7D5 


0723 


DC 


ABB2 


ABOl 



BLOCK 
LABEL 


BLOCK 
LOC 


BLOCK 
NUMBER 


DROP 


ADG4 


AD12 


DS 


ACA4 


ACIO 


DOOl 


BBB2 


BB04 


0002 


BBBl 


BBOl 


00053 


3BD1 


BB03 


D006 


BCBl 


BCOl 


D0081 


BCEl 


BC04 


D0082 


BCFl 


BC05 


D0084 


3CE2 


BC08 


DOlOl 


BCF2 


BC09 


D020 


BBE4 


BB14 


D0223 


BBG3 


BB24 


D024 


BBK5 


BB20 


D104 


BAB4 


BA09 


D107 


3AB5 


BA14 


D140 


BBGl 


BB09 


EF07 


AHH5 


AH16 


EF08 


AHH4 


AH15 


EGll 


AJJ4 

AKE2 


AJIO 
Ak05 


EG12 


AKD2 
ALDl 


AK04 
AL04 


EG15 


AJK3 
AKG2 


AJ12 
AK07 



EG16 



AKD4 



AK08 
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BLOCK 
LABEL 


BLOCK 
LOC 


BLOCK 
NUMBER 


BLOCK 
LABEL 


BLOCK 
LOC 


BLOCK 
NUMBER 


BLOCK 
LABEL 


BLOCK 
LOC 


BLOCK 
NUMBER 


EJECT 
EM04 


ADBl 
AMC2 


ADOl 
AM04 


FA121 


BFGl 
3FH4 
BGG2 
3GH4 
BHD3 


BF06 
BF14 
BGOS 
BG12 
BH24 


F730 


BFHl 
3FJ4 
BGH2 
3GJ4 

3HE3 


BF07 
BF15 
BG06 
BG13 
BH25 


EM08+4 
END 


AMD2 
ADB4 


AMOS 
ADOS 


FA22 


BGE2 
3GF4 
3HG5 


BG04 
BGll 
BH23 


F744 
F746 


BBB3 
3CB5 


BB26 
BC14 


ENTRY 


ADFl 


AD03 


FBOl 


BHB3 


BHOl 


MACHA 


AJB2 


AJOl 


EN07 


AMF3 


AMIS 


FB03 


3HB4 


BH16 


MACHB 


AHB4 


AH09 


ENll 


AMJ3 


AMIS 


FB07 


3HC5 


BH19 


MACHC 


AIA2 


AIOl 


EN12 


AMH3 


AM17 


FB14 


3HD5 


BH20 


MACHD 


AIB2 


AI02 


EN13 


AMH4. 


AM12 


FB17 


3HF1 


BH06 


MACHE 


AKB3 


AKOl 


EN25 


ANBl 


ANOl 


FB20 


3HH1 


BH08 


MACHF 


AKB2 


AK02 


EN26 


AMJ2 


AM21 


FB23 " 


3HF2 


BH13 


MACHG 


ALAl 


ALOl 


EN27 


AMH2 


AM20 


FB26 


3HF5 


BH22 


MACHH 


ALBl 


AL02 


EPOl 


ANH3 


ANll 


FCOl 


3CJ3 


BC13 


MACHI 


AHF4 


AH13 


EP021 


ANF3 


AN09 


FHll 


07B1 


0702 


MACHJ 


AHB3 


AH08 


EQU 


AECl 


AEOl 


FH12 


7D1 


0704 


NOTE - 


A0D4 


A029 


ER03 


ANC4 


AN17 


F232 


3CB4 


BC13 


ORG 


AGCl 


AGOl 


ER04 


ANE5 


AN2S 


F237 


BEH4 


BE21 


SEE NOTE 1 


3AD4 


BAll 


EVEl 


AME4 


AM09 


F502 


3ED1 


BE03 


SEE NOTE 2 


: 3AE4 


BA12 


EXTRN 


AEC4 


AE09 


F511 


3ED3 


BEll 


SPACE 


AGC4 


AG08 


FA05 


3FB2 
3GB2 


BF08 
BGOl 


F5172 


BEE3 


BE12 


START 


AFB4 


AF08 


FA12 


3FE4 
3FF1 
3GD2 
BGE4 


BF12 
BF05 
BG03 
BGIO 


F708 
F709 


3BB4 
3EJ4 


BB25 
BE22 


USING 
ICTL 


AHBl 
AFBl 


AHOl 
AFOl 
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TABLE II; ENTRY CONNECTOR REFERENCES 

This table lists all off-page entry 
connectors that are referenced by any off- 
page exit connector on another chart. The 



entry connectors are arranged in alphameric 
order with the grid Ipcation and block 
number of all blocks that reference this 
connector to the right and on as many 
additional lines as necessary. 



ENTRY 
CONN 


EXIT 
CONN 


BLOCK 
NUMBER 


AMD2 


ANE2 


AN15 


AME4 


ANK3 


AN13 


AMJ2 


ANE5 


AN25 


ANBl 


AMK2 


AM22 


ANB3 


AMK3 


AM19 


A0A5 


APD2 


AP04 


A0B5 


APE2 
APE3 
APJ3 


AP05 
AP15 
AP19 


A0C2 


APF4 
APG2 


AP23 
AP24 


APA2 


A0C3 


A014 


APE2 


A0A5 


A027 


BABl 


07D4 


0719 


BAG2 


BCH2 


3C11 


BDB2 


07C3 


0713 


3EB1 


BDFl 


BO06 


BEB4 


3DH1 


BD08 


BFHl 


07F4 


0721 


C8D1 


06A5 
06B5 
06C5 


0611 
0611 
0611 



04A5 



AFH4 



AF15 



ENTRY 


EXIT 


BLOCK 


CONN 


CONN 


NUMBER 


04B1 


03K2 


0315 




03K3 


0314 




05J4 


0511 


04B5 


AAG4 


AA13 




ABG4 


AB17 




ACJl 


AC08 




ACK4 


AC 19 




ADBl 


ADOl 




ADD4 


ADIO 




ADJl 


AD06 




ADJ4 


AD 14 




AEG4 


AE13 




AEJl 


AE07 




AFHl 


AF07 




AGF4 


AGll 




AGHl 


AG06 




AHGl 


AH06 




AHJ5 


AH17 




AIK2 


AI17 




AJJl 


AJ15 




AKJ2 


AK14 




ALKl 


AL09 


05B2 


04B5 


0420 


05F2 


04B5 


0420 




04C4 


0417 




04H1 


0407 


07A1 


BBKl 


BB12 




BDG4 


BD14 




BEG3 


BE14 


07E1 


BAHl 


BA07 




BAJ5 


BA20 


07G2 


BAC2 


BA08 




BBDl 


BB03 




BBD3 


BB08 




BBG3 


BB24 




B3H2 


BB13 




B3K5 


3B20 




BCE2 


BC08 


07H3 


BBB4 


3B25 




3CC5 


BC15 




BDHl 


BD08 




BEJ4 


BE22 




3EK1 


BE09 




BFF4 


3F13 




BFHl 


BF07 




BGE2 


BG04 




BGF4 


BGll 




BHE3 


3H25 




BHG5 


BH23 
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TABLE III SUBROUTINE USAGE 

This table lists the subroutine names as 
they appear in subroutine blocks on the 
individual charts. The first appearance of 
a subroutine block has the name of that 



block as it appears in the first line of 
the block. To the right of the name is 
found the entry point into the subroutine, 
if it is present, and the grid location and 
block number of each block where this 
subroutine reference appears. 



5UbR0UTINE 
NAME 


ENTRY 
CONN 


BLOCK 
LOC 


BLOCK 
NUMBER 


BA 




BABl 
BDBl 
BDB4 


BAOl 
BDOl 
BD09 


BAR 




AAB2 
AFG4 


AAOl 
AF14 



BUMP 
CVTL 

DCC 
DCF 

DCF2 
DCF4 
OCXl 
DOUT 
DROP 
EER 



ERR 



05J4 



BBF4 
BBHl 
BBH5 



ANK5 



ANE4 



ANF4 



ANH5 



07J1 



BBJl 



0511 



BB15 
BBIO 
BB18 



AN29 



ABC2 


AB02 


ABJ2 


ABIO 


ACB4 


ACll 


ACG4 


AC16 



AN19 



AN20 



AN27 



0709 



BBll 



BBE4 


BB14 


BCBl 


BCOl 


BEDl 


BE03 


BEF4 


BE19 


BFF4 


BF13 


BGE2 


BG04 


BGF4 


BGll 


BHF5 


BH22 


BHG5 


BH23 


AAF3 


AA15 


ABF3 


AB18 


ACJ2 


AC09 


ACJ5 


AC20 


ADOl 


AD02 


ADDS 


ADll 


ADJ2 


AD07 


ADJ5 


AD15 


AEG5 


AE14 


AEJ2 


AE08 


AFE5 


AF16 


AFHl 


AF07 


AGF5 


AG12 


AGH2 


AG07 


AHG2 


AH07 


AHJ5 


AH17 


AIK2 


AI17 


AJJl 


AJ15 


AKJ2 


AK14 


ALJ2 


AL29 


ANEl 


AN04 


04C4 


0417 



EVE 



AMB3 



AAB4 



AA08 



SUBROUTINE 


ENTRY BLOCK 


BLOCK 


NAME 


CONN LOC 


NUMBER 


EVE 


AMB3 AAC2 


AA02 




AAE4 


AAll 




AAF2 


AA05 




^BC4 


AB13 




ACBl 


ACOl 




ACFl 


AC05 




ADBl 


ADOl 




ADB4 


AD08 




ADFl 


AD03 




ADG4 


AD12 




AEC4 


AE09 




AEDl 


AE02 




AFCl 


AF02 




AFC4 


AF09 




AGCl 


AGOl 




AGD4 


AG09 




AGE4 


AGIO 




AHBl 


AHOl 




AHB4 


AH09 




AHEl 


AH04 




AHF4 


AH13 




AIB2 


AI02 




AIC4 


AI09 




AIF2 


AI06 




AIF4 


AI12 




AJB2 


AJOl 




AJE2 


AJ04 




AJG3 


AJ07 




AJJ4 


AJIO 




AKB2 


AK02 




AKE2 


AKOS 




AKF4 


AKIO 




ALBl 


AL02 




ALC5 


AL22 




ALD2 


AL12 




ALD3 


AL16 




ALFl 


AL06 




ALF3 


AL18 




ALG5 


AL25 




0433 


0411 




04C3 


0412 




04F4 


0419 




04G2 


0408 


FERR 


BBD3 


BB08 




BBG3 


BB24 




BBH2 


BB13 




BBK3 


BB23 




BCB5 


BC14 




BCHl 


BC07 




BEDS 


BE23 




BEGl 


BE06 




BEH4 


BE21 




BEJl 


BE08 




BFGl 


BF06 




BFH4 


BF14 




BGG2 


BG05 




BGH4 


BG12 




BHD3 


BH24 




07F2 


0715 


INOUT 


BAE4 


BA12 




03B3 


0301 




03J3 


0313 




03K2 


0315 




04B1 


0401 




0SG4 


0514 




05G5 


0517 




05J2 






06C3 


0621 




06D2 


0606 




06D3 


0622 




06H1 


0614 




07F1 


0706 
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SUBROUTINE 


ENTRY 


BLOCK 


BLOCK 


NAME 


CONN 


LOC 


NUMBER 


PCHA 




BAFl 


BAGS 






BDEl 


BD05 






BED3 


BEll 






07E5 


0724 






07H3 


0727 


PRTA 




BAEl 


BA04 






BAGS 


BA19 






BBKl 


BB12 






BCF2 


BC09 






BDF4 


BD13 






BEE3 


BE12 






07G2 


0716 



PRTERR 
SER 



BAC4 



SKNB 



STOCAW 



BAIO 



BBBl 


BBOl 


BBB2 


BB04 


BBGl 


BB09 


BB65 


BB17 


BEB4 


BE15 


BEC4 


BE16 


BEE4 


BE18 


BFB2 


BFOB 


BFB4 


BF09 


BFCl 


BF02 


BFD4 


BFll 


BFEl 


BF04 


BGB4 


BG07 


BGC2 


BG02 


BGD4 


BG09 


BHCl 


BH03 


BHC4 


BH17 


BHGl 


BH07 


BCG2 


BCIO 


BDE4 


B012 


APB2 


AP02 


APB3 


AP12 


APF4 


AP23 


APG3 


AP17 



SUBROUTINE 


ENTRY 


BLOCK 


BLOCK 


NAME 


CONN 


LOC 


NUMBER 


STORE 




AAC4 


AA09 






AAD2 


AA03 






AAF4 


AA12 






AAG2 


AA06 






ACCl 


AC02 






ACGl 


AC06 






ADC4 


AD09 






ADGl 


AD04 






ADH4 


AD13 






AED4 


AEIO 






AEEl 


XE03 






AFDl 


AF03 






AFD4 


AFIO 






AGDl 


AG02 


STORE 




AGF4 


AGll 






AHCl 


AH02 






AHC4 


AHIO 






AHFl 


AH05 






AHG4 


AH14 






AIC2 


AI03 






AI04 


Alio 






AIG2 


AI07 






AIG4 


AI13 






AJC2 


AJ02 






AJF2 


AJ05 






AJH3 


AJ08 






AJK4 


AJll 






AKC2 


AK03 






AKF2 


AK06 






AKG4 


AKll 






ALCl 


AL03 






ALD5 


AL23 






ALE2 


AL13 






ALE3 


AL17 






ALGl 


AL07 






ALG3 


AL19 






ALH5 


AL26 






ANF3 


AN09 



TLUL 



TLUN 



AFH4 
ANBl 



05C3 



AF15 
ANOl 



0507 
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APPENDIX B: AUTOCHART SYMBOLS 



iftt********** *«»«»»««««««««»«««»«««««««««»«»«««»««««««»««««*««»«««»»«««»«»««»«««»«««'««««»««««««««»«««*«««««««»« 



«»«*««*«««««« 



FUNCTIONAL SYMBOLS 



SAMPLE FLOWCHART 



«««««B1****^***** 



««*««»«»««««« 





*«»«» 




*ZA * 




* C3» 


*»»* » * 




» * 


C3 


*.X. 



BLOCK C3 IS ENTERED FROM THIS CHART AND FROM 
AT LEAST ONE OTHER CHART. ALL REFERENCES TO 
OFF-PAGE ENTRY CONNECTORS CAN BE FOUND IN 
AUTOCHART CROSS-REFERENCE TABLE II. 



««»»C2** ******* 
* USER ENTRY » 



««»««C 3*** ******* 



***************** 



THE TERMINAL BLOCK IS USED TO SHOW USER ENTRY 
AND EXIT POINTS WHEN THE PROGRAM BEING 
FLOWCHARTED IS AVAILABLE TO AN IBM CUSTOMER. 
IT IS ALSO USED AS AN EXIT CONNECTOR WHEN 
THE TO LOCATION IS TO NO SPECIFIC CHART AS IN 
A MULTIPLE USE SUBROUTINE. 



««««D 1 ********* 

* TERMINAL * 

* BLOCK * 

*************** 



************** 



******pi*********** 



************* 



•GOTO X 

»»«*«E3********** 
*SUBNM ZCAl* 



***************** 



««««F2** ******* 
* * 

» USER EXIT « 



THE INSTRUCTION AT SYMBOLIC LOCATION GOTO 
CALLS A SUBROUTINE NAMED SUBNM. THE LOGIC OF 
SUBNM IS SHOWN ON CHART ZC STARTING AT BLOCK 
Al. ALL REFERENCES TO SUBROUTINES CAN BE 
FOUND IN AUTOCHART CROSS-REFERENCE TABLE III. 



.*. ...X* C3 



«»«««G 1********** 



-*-*-*-*-* 



***************** 



****\^2** ******* 

* * 
♦VARIABLE RETURN*X. 

* * 
*************** 



LINE JUNCTION 



«««««H3 ********** 



«»»»«««««««««»««« 



*ZB * 
* A2* 



»«««**«»«»»»«»«*»«»««»»»*«»»*«»»«»»»«*»»*»«»«««»*«»««««««*»»»»»««»»»*»««»»»««»»»♦»««»«*♦♦»*»»*»♦«*»»»»»«»»»»»»»»«»««« 
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GLOSSARY 



address ; The unique identification of a 
register^ storage location, or other data 
source or destination. 



Assembler 



instruction 



statement : 



An 

assembler language statement that directs 
the operation of the assembler or affects 
the format, content, location assignments, 
or register usage of its output, and usual- 
ly does not cause any machine language 
instructions to be produced. 

compound expression ; A combination of two 
or, at most, three simple expressions, 
connected to each other by arithmetic oper- 
ators. 

ESP cards ; These cards or card images on 
tape are part of the object program deck, 
and are produced for each START, ENTRY, and 
EXTRN Assembler instruction to provide com- 
plete linkage between different object pro- 
grams . 

Intermediate Text ; The partially translated 
source statement produced by Phase I and 
used as input to Phase II. 

location counter ; The internal counter used 
to assign consecutive storage addresses to 
program statements. 

machine instruction ; An Assembler language 
statement specifying an operation that cor- 
responds to a machine operation or opera- 
tions, and that causes the Assembler to 
produce a corresponding machine- language 
instruction or instructions. 

Operation Code Table ; The table that is 
part of Phase I and contains each symbolic 
operation code, its machine equivalent, and 
the location of the routine necessary to 
translate the operand field. 

Register Table ; The table constructed by 
Phase II that contains general register 



numbers, their corresponding values and 
relocatable attributes and is used to 
assign base registers and displacements 
when the assembler must compute addresses. 

relocation ; Modification of address con- 
stants to compensate for the difference 
between the origin assumed in an object 
program and its assumed origin relative to 
other object programs with which it is 
combined. 

RLD cards ; These cards or card images on 
tape are part of the object program, and 
are produced for each relocatable address 
constant and CCW defined in the program to 
allow the Relocatable Loader to reevaluate 
symbols and expressions within address con- 
stants and CCW's. 

RLD Table ; The table constructed by Phase 
II that contains the data necessary to 
produce the RLD cards. 

simple expression ; A single symbol or a 
single self-defining value used as an oper- 
and* 

symbol ; Any collection of characters by 
which something is known and can be 
referred to; a name. 

Symbol Table ; The table constructed by 
Phase I that contains all the symbols, and 
their attributes, contained in the source 
program. 

Symbol Table Deck ; The deck (produced in a 
card system only) that contains the attri- 
butes of all the symbols in the object 
program and is used as input to Phase II. 

TXT cards ; These cards or card images on 
tape, are part of the object program deck, 
and contain the machine language statements 
constructed from the symbolic statements in 
the source program. 
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INDEX 



Assembler instructions (see also specific 
instructions) 
Phase I 

Errors 21,2 8-4 1,53-60 
Translation 26,28-41,53-60 
Phase II 

Errors 78-83,87-91 
Translation 74,75,78-83,87-91 
Assembler Program 
Purpose 7 
Organization 7 
Attributes, Symbol 17 
Autochart Cross Reference Tables 95-100 

BAR Subroutine 20,99 
Buffer areas , output 1 1 
BUMP Subroutine 21,99 

Cards (see also specific cards) 
ESD 66,71,81,82 
RLD 66,71,73,82 
TXT 66,71 
Symbol Table 18 
Card buffer areas 1 1 
CCW Assembler instruction 
Phase I 

Errors 21,52 

Intermediate text 16,28,29 

Source statement 28 

Translation 28,53 
Phase II 

Errors 74,75,90,91 

Special considerations 73,79 
CNOP Assembler instruction 
Phase I 

Errors 21,55 

Intermediate text 16,31 

Translation 30,55 
Phase II 

Errors 75,86,87 

Special considerations 76 

Translation 81 ,86,87 

DC Assembler instruction 
Phase I 

Errors 21,54 
Intermediate text 16,30 
Translation 29,54 
Phase II 

Errors 74,75,90,91 
Special considerations 76 
Translation 83,90,91 
DCC Subroutine 19 
DCF Subroutine 19 
DCX Subroutine 19 
DOUT Subroutine 77,78,98 
DROP Assembler instruction 
Phase I 

Errors 21,56 
Intermediate text 16,33 
Translation 33,56 
Phase II 



Errors 74,75,88 

Special considerations 73 

Translation 82,88 
DS Assembler instruction 
Phase I 

Errors 21,55 

Intermediate text 16,32 

Translation 32,55 
Phase II 

Errors 75,90 

Translation 82,90 



EER Subroutine 75,98 
EJECT Assembler instruction 
Phase I 

Errors 21,56 
Intermediate text 16,33 
Translation 33,56 
Phase II 

Errors 75,85 
Translation 81,85 
END Assembler instruction 
Phase I 

Errors 21,56 
Intermediate text 16,34 
Special considerations 26 
Translation 34,56 
Phase II 

Errors 75,89 
Translation 82,89 
ENTRY Assembler instruction 
Phase I 

Errors 21,56 
Intermediate text 16,35 
Translation 35,56 
Phase II 

Errors 74,77,88 
Special considerations 67 
Translation 78,81,88 
ERR Subroutine 20,24,98 
Errors (see specific instructions) 
Error flags, list of 20,77 
EQU Assembler instruction 
Phase I 

Errors 21,56,57 
Intermediate text 16,36 
Translation 35,56 
Phase II 

Errors 82^89 
Trans lat ion 82,89 
ESD Card 

Described 67 
Format 71 
EVE Subroutine 19,20,24,98 
EXTRN Assembler instruction 
Phase I 

Errors 21,57 
Intermediate text 16,37 
Translation 36,57 
Phase II 

Errors 74,88 



Index 
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Special considerations 67 
Translation 79,81,88 

FERR Subroutine 77,79,98 

ICTL Assembler instruction 
Phase I 

Errors 21,58 
Intermediate text 16,37 
Translation 37,58 
Phase II 

Translation 81 , 87 
ID-Code (see also Intermediate text and 
specific instruction) 
Phase I 15,16,20,23,24 
Phase II 67,78,79 
INOUT Subroutine 23,76,77,99 
Instructions (see specific instructions and 

formats) 
Intermediate text 

Detailed (see specific instructions) 
General 15,16 
Summary 1 6 



Listing, Program 

Location counter 

Logic flow 

Phase I 7,23,49,51 
Phase II 8,78,85,86 



7,8,9,72 
7,14,17,20,21,22,26 



Machine instructions (see specific 
instruction format) 

Object program 7-11,14,67,73,76,78 
Operand translation (see specific 

instruction) 
Operation code (see also Operation Code 
Table) 

Errors 8 
Translation 7,8 
Operation Code Table 
Description 15 
Used 7,8,14,23 
ORG Assembler instruction 
Phase I 

Errors 21,59 
Intermediate text 16,38 
Translation 38,59 
Phase II 

Errors 82,89 
Translation 82,89 
Output 

Phase I 4-11,16,17 
Phase II 4,11,67-72 
Output buffer area 11 
Output cards (see specific card) 
Output listing 7,8,9,72 

PCHA Subroutine 76,99 
Phase I 

Description 7, 14-22 

Logic flow 7,12,24-27 
Phase II 

Description 8,67-77 

Logic flow 8,13,78-80 
Program listing 7,8,9,72 
PRTA Subroutine 76,79,99 
PRTERR Subroutine 99 



Register Table 
Described 73 
Used 75,78,82 
Relocation List Dictionary Table (see RLD 

Table) 
RLD Card 

Described 67 
Format 7 1 
RLD Table 

Described 73 
Used 67,77,78 
RR Format 
Phase I 

Errors 21,61 
Intermediate text 16,42 
Translation 42,61 
Phase II 

Errors 74,75,92 
Translation 75, 79, 80, 83, 92 
RS Format 
Phase I 

Errors 21,61 
Intermediate text 16,43 
Translation 42,56 
Phase II 

Errors 74,75,92 
Translation 75 , 79 , 80 , 84 , 92 
RX Format 
Phase I 

Errors 21,62 

Intermediate text 16,44,45 
Translation 45,62 
Phase II 

Errors 74,75,93 
Translation 75,79,80,84,93 

SER Subroutine 74,75,99 
SI Format 
Phase I 

Errors 21,63 

Intermediate text 16,45,46 
Translation 45,63 
Phase II 

Errors 74,75,93 
Translation 75,79,80,84,93 
SKNB Subroutine 99 
Source program 7,9,10,14,24,72 
SPACE Assembler instruction 
Phase I 

Errors 21,59 
Intermediate text 16,39 
Translation 38,59 
Phase II 

Errors 81,87 
Translation 81,87 
SS format 
Phase I 

Errors 21,64 

Intermediate text 16,46,47 
Translation 46,64 
Phase II 

Errors 74,75,84,94 
Translation 75,79 
START Assembler instruction 
Phase I 

Errors 81,88 
Intermediate text 16,39 
Translation 39,58 
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Phase II 

Errors 81,88 

Special considerations 67 
Translation 80 , 82 , 88 
Storage allocation 9 
STORE Subroutine 19,20,99 
Subroutines, described (see also specific 
subroutine) 

Phase I 19-23 
Phase II 74,79 
Symbols 7,8,14,17,19,21,22,24,26,67,74 
Symbol Table 

Attributes 1 7 
Described 17 
Phase I, used 
Phase II, used 
Symbol Table card 
Symbol Table deck 



7,8,14,22,26,27 
7,8,67,74,79,80 
18 
7,8,9,14,24,27,79 



Tape buffer areas 1 1 
Tables (see specific table) 
TLUN Subroutine 22,26,99 
TLUS Subroutine 22,23,99 
TXT card 

Described 67,78 

Format 71 



USING Assembler instruction 
Phase I 

Errors 21,60 

Intermediate text 16,40,41 

Translation 40,60 
Phase II 

Errors 74,75,82,88 

Special considerations 73 

Translation 82,88 
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